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Das Eee IS 8 te Fa DIGITAL INPUT 
QUTPUT CONTROL OPTION. He Be Tre OPTION ATLL oe 


TESTED-sBu 20, The ELEXTEDLIT OTe GoTo THE OPER 
pet eel bh ues ILE 
Lene a “eats 2! ‘startin ay ie 


ATIONS “BASESA” 
BR NORMAL SAC TOR Conet G., ALL SWITCH REGISTER ais § Soule BE RESET. 


REQUIREMENTS 


EQUIPTMENT 
PDP-11 FAMILY COMPUTER WITH TELETYPE 


Beers Rs ON Bodt?o sutBut TO INPUT WRAPAROUND CAELE 


LOADING PROCEDURE 





THE PROCEOURE FOR LOADING BINARY TAPES SHOULD BE FOLLOWED. 





2 
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_g 
4 BE 


CEO COO MUTE GI ODD SRL Dw BU Lola CBee OM Liatoe CBee 


0 = 0 = = 2 ooh = ha = 8 be 2 bo 8 bo 0 0-0 2 2 0 -s 





4, STARTING PROCEDURE 


4.1 CONTROL SWITCH SETTINGS (LOGIC TEST) 
F THE DIAGNOSTIC IS RUN ON A CPU WITHOUT & SWIT 


Se ick a wane ica oem 
eiPP k A fes777) Wen he sirnewe Sulton 


(LOC. 1 
CONTROL: 
OGRAM ALSO SUPPORT LOADING OF THE SOFTWARE SWITCH 
; REGISTER Ne bgt: obthes FROM Mery. NTIS GAN ACCOMPLI c BY 


1) TYPE CONTR THIS WIL OW TTY To NTER DATA INT 
LOC. (oe ROL 8 tees POINTS WITHIN THE — ay 


2) ne mace  ieeeeeeess (XXXXXX IS THE OCTAL CONTENTS 
OF T SOP WARE SUITCH RES REGIS ER.) 
3) AFTER THE **NEW="" HAS oe Rictaan THEN THE OPERATOR CAN DO ONE 

OF THE FOLLOWING AT THE T 


A) Hin A NUMBER TO BE LOADED INTO LOC. 176 FOLLOWED BY A <CR>. 
(ONLY woe |) ene O-7 WILL BE ACCEPTED AND ONLY & NUMBERS 


WILL BE ALLO 
IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 


8) IF A CONTROL U <tU> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 
Back TO STEP 2. | 


WILL BE USED AS THE SOFTWARE DISPLAY REGISTER. 


SW 1S =1 HALT ON ERROR 

SW Y= 1 LOOP ON CURRENT ae Test 

SW 13 =1 INHIBIT ERROR T 

SW le =1 LOOP ON CURRENT: Y SELEC ® gate 

SWil =i sNHTBLT SUs-Test INTERATIO 

SW 10 =1 OUTPUT TQ INPUT WRAPAROUND CABLE NOT CONNECTED 
SW O09 = 1 LOOP ON ERROR 

SW O08 = 1 LOOP ON TEST IN SWR <7:0> 
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4.2 STARTING ADDRESS OR ADDRESSES 


Sb: Vaal 


OPERATING PROCEDURE 


THE FOLLOWING JUMPERS MUST BE INSTALLED TO EXECUTE THE 
LOcrc We1A, W2eA_AND Wes 
HE CUSTOMER HAS SE 8" SECTION OF THESE JUMPERS 


is elds eae SEHILE OWT Be tciN Tee IUERS. +s 
Or he rll ITY YR OEM RAED ser. 
aE uy 1 RoE RATOR fest tut ION BAY on” SHITeH oe ESTO 


##% NOTE: OPERATOR MUST I RT INFORMATION WHEN REGUESTED BY 
PROGRAM. THE MACHINE WILL SWR=XXXXXXNEW= AFTER NEW= 
THE INFORMATION IS INSERTED. REFER TO SECTION 4.1 2) ### 


0-0-6 -0 +h - 9 -- p< 


C~SSOIERZORABBB UE & 


Poe oe 9 
@ 


THIS PROGRAM USES 3 MG DIAGNOSTIC mt PACKAGE FOR 
et REPORTING AND TYPEOUT. REFER TO THE “ERROR POINTER TABLE™ 
FOR TYPE AND DESCRIPTION OF ERRORS. 


7. RESTRICTIONS 


 - F SEQUENTIAL DRL IK -K’S, ALL DR1I-K’S MUS TBE IN 
T SWITCHES AND DATA PATH Ji PE Gone TSeRATION. 

2. THE F ERRUET (SHI TCHES Bt BE IN THE “Fa. TORY™ POST 
7. HEERATOR MUST. Te THE aGQRRECT INT T SW TCHES 

‘ aN Bh A PATH J JUMPER AND SWITCH conc T 

INFORMATION. TO THE INITAL IZATION STIONS OR AN TERROR WILL OCCUR. 
4. FOR MULT GROUPS OF CONSECUTIVE 
THIS DIAGNOSTIC MUST BE RUN FOR EACH GROUP. 
8. MISCELANEOUS 


8.1 EXECUTION TIME 


THE LOGIC TEST WILL TAKE rigs ay phe SECONDS FOR COMPLETION 
‘ 4 CONT /0S TYPE AND WILL T 5 PASS’. 

LINE LOOP WILL NEVE 
THE COULTER INTERFACE LOOP WILL NEVER EXIT. 


1 
1 
1 
1 
1 
1 
1 
i 
1 
i 
i 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
t 
i 
1 
1 
1 
1 
i 
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8.2 DEVICE ADDRESS PROGRAM LOCATIONS (AT APPROX. 1300) 


GTI BSED SNTANS TS SLIME ESE HU SOURS SED 


OR11-K BR LEVEL <200><4 


Hr RINE OTS On ORTH LST 


AND VECTOR AND UPDATE THE ACTUAL PROGRAM V 
PROGRAM DESCRIPTION 


LOGIC TEST 
REG TERS. "CL ACL. JUMPE RE AND. SUITCHES Con COMB INAT ONS EXCEPT: 


W2lA, We2A AND W23A CAN BE DIAGNOSED. 


THE PROGRAM CHECKS THAT re DR11-K CAN INTERRUPT AND THAT 
“RESET” WILL WORK CORRECTL 


CONTROL LINE LOOP 


THIS TEST LOOP PROVIDES THE OPERATOR WITH A 
SCOPE LOOP FOR CHECKING Wel, Wee AND We3 IN THE “8” POSITION.. 


COULTER FUNCTION LOOP 
UIYW SOFTueRe' INTERFACE MITH The COULTER WEROMRRE. 
THE PROGRAM WAT T TAFE a ri 8 8 T ee 1K, Tk UPON 
ult, wa, DELAYS 7a.Asec. FO Ou THE DATA LINES 


: THE wt DATA vie a cone BUFF 
HER FOUR Pit TES NOPEERS WITH 2 ERO BEING THE 
FERNINA OF A ig BE THE PR 


OGRAM 
N THE POLL I ORT ARO THEN TART 
UN a TYPED RE sur ¢ "90 TH 

COULTER ge TO VERIFY A SUECES ur RUN. 
XXX" WHERE N = TEST RUNGER AND XXX = TEST RESULTS 


i=) 
— 


TUTU 0 0 = & ~~ 0 b+ b+ b= 0 bo po bo he po 
BSBSRRLEC SSSR ES | 


Poets 


wes 


: 
5 
2 
5 
5 
5 


ob oo a ee 
MOYO Wwrue-O 


Rey 
~_ 


TABLE OF CONTENTS 


ATTACHED. % 
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232 


: 
23? 
248 001109 
z 
esl 
S ) 
BB 
ess 000915 
528 090200 
es 177776 
2s8 
253 177774 
Oe 
Sra 177570 
263 
264 
26S 000000 
Pi] 000001 
| ee 
269 000004 
44 , 000005 
ee 000007 
273 
274 
sop 
e 000000 
278 000040 
279 100 
280 140 
281 000200 
ces 000240 
28 000300 
2o4 000340 
ees 
286 
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hire tcc LOGIC TEST MAINDEC-11-DZDRG-C 
Bite, RENE a 


{PROGRAM BY RAYMOND SHOOP 


THIS 


ING THE a be MAINDEC SYSMAC 


PROGRAM WAS US 
iSPAckaGe (MAINDEC-11-DZQAC-C1),MAR 24, 


;REVISED 21 MAY 76 BY F. ROEMER 
TO SUPPORT DYNAMIC LOADING OF SOFTWARE SWITCH REGISTER 


-SBTTL BASIC DEFINITIONS 
a Fi — OF THE STACK POINTER ### 1100 ### 


BW as 


tiBAS1€ DEFINITION OF Scope act 


;#MISCELLANEOUS DEFINITIONS 


ATs T= ll ;;CODE FOR HORIZONTAL TAB 
12 $$ CODE FOR LINE FEED 
iP: 15 $3 FOR CARRIAGE RETURN 
CRLF= 200 TOBE FOR RETURN-LINE FEED 
PS= 177776  BROGESSOR STATUS WORD 
S i 3 3 STACK LIMIT REGISTER 
PIRQG= 177772 NTERRUPT REQUEST REGISTER 
= 177570 + HAROWARE ITCH REGISTER 
1sP= 177570 *:HARDWARE DISPLAY REGISTER 
;¥GENE. i PURPOSE REGISTER DEFINITIONS 
Ro= %0 ;;GENERAL REGISTER 
Riz x4 js GENERAL REGISTER 
Re X + GENERAL RSTER 
z “4 ;;GENERAL REGIS 
= “5 $8 RAL REGISTER 
= “% :GENERAL REGISTER 
R7= “7 ?:GENERAL REGISTER 
.EQUIV R6,SP ::STACK POINTER 
“EQUIV R7;PC +: COUNTE 


;#PRIORITY LEVEL DEFINITIONS 


Pro= so > ;PRIORITY LEVEL 0 
PRi= 40 ;;PRIORITY LEVEL 1 
PRe= 100 ss PRIGR ITY LEVEL 2 
PR3= 140 ;;PRIORITY LEVEL 3 

= 200 ;;PRIORITY LEVEL 4 

= 240 ;;PRIORITY LEVEL S 
PRE= 300 ;;PRIORITY LEVEL 6 
PR7= 340 ;;PRIORITY LEVEL 7 


;#°SWITCH REGISTER” SWITCH DEFINITIONS © 
190000 


Swiss 


101 
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NI 


Bula of Ta 





;;TIME OUT AND OTHER ERRORS 


: : 
B 
Z 

7 oN a tee 
es eareseaee & 
HERE = SI Beeeeeee Stra .sosasaoeee e. 
is an eZ22EPrDDD rer PHERUNAARPDRRD PRD? Be 


— es | 


; BEREAN RARE TES 


ee mee ee 
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DZDRGC.P11 BASIC DEFINITIONS 


34 10 RESVEC= 10 ;;RESERVED AND ILLEGAL INSTRUCTIONS 
14 TBITVEC=14 "Tt" BIT 
4 ° 

RG oie 
a8 | OT cs $3 NPUT /QUTPUT TRAP { OT) #4SCOPES* 
350 ENTve = + TOR beep (EMT) ##ERROR## 

1 C i T TRAP 

3 Teves 64 Thy Be YAGER VEE Dee 

4 PrROvEC=edO tTPROGRAM IN a VECTOR 
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-SBTTL OPERATIONAL SWITCH SETTINGS 


oo eS a_i 

it 15 was 

;# 14 

+ iB ineht Fe QUIECTED DRII-K 

+ tb IIe, PTET coun CABLE NOT CONNECTED 
+ : LOOP ON TEST IN SWR«7:0> 


-SBTTL TRAP CATCHER 


SR ERER FRESE A cabs dat teat 


900000 
R " .+2,HALT™ 
BL, UNUSED LOCATIONS, ERON 4 = 27% COnTAIN a = 42, HAL 

~ s#LOCATION I CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
000174 DISPREG: aren 0 ;;SOFTWARE DISPLAY REGISTER 
000176 SWREG: -WORD OQ ;;SOFTWARE SWITCH REGISTER 
000200 137 1365 : tabi SIBRTING. aBeGTR JUMP ~ Sra TING vt e 
Gone Ooolsr Obl3ze wre Gasecin 7° "" "sath 10 The Resta 
a tae 
ais 14 B01 37 pt ares tip ~ eee : JUMP TO THe ed ahs rines oop LOOP 


oe ee ees — ———— 
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-SBTTL COMMON TAGS “ 





384 ETMIS TABLE CONTAI seveseaeatue-auantesenaseseseseseseatatesee 
:#TH COMMON STORAGE 
=e EES Wie, 
001100 =1100 
1109 AG s;START OF COMMON T 
11 S: .WORD :CONTAINS PASS C 
110s 00 Lb “ere ;;CONTAINS THE he NUMBER 
att SICNT “WORD : +: CONTAINS SUBTEST oGeERAT ION. COUNT 
ill RR: . , =: CONT TURN E 3 ERRORS 
= Baile Sep par: “HORD 3 a ra Ne 76 9p S DETECTED 
1114 SITEMS: .BYTE © NS ITEM CONTROL BYTE 
338 091115 SERMAX: .BYTE 1 ; CONTAINS MAX. ERRORS PER a 
400 ate Hanae “HORD 5 a TAINS AboRESE cr Scone xR DATA 
401 tee SEDAOR: “WORD 0 CONTA NS ADDRESS OF "BAD" DATA 
it) o « 9°) 
Bot tse ti close 8 conan BAS" DATA 
Woe Doliae WORD 6 spaemanect sane otent came: 
406 901134 TOB: .BYTE : ;;AUTOMATIC MODE INDICATOR 
107 D011 35 SINTAG: -BYTE : INTERRUPT MODE INDICATOR 
409 001140 177570 SUR: “LORD DSWR ;;ADDRESS OF SWITCH REG 
410 601142 177570 DISPLAY: .WORD DDISP ::ADDRESS OF DISPLAY REGISTER 
vi fatise ffee ng: eee Ty A EP 
Wi Dollee | 177bee ses: i77ee srITY PRINTER SraTUs REG. AOORESS 
415 001154 000 i: .BYTE 0 *:CONTAINS NULL CHARACTER FOR FILLS 
416 O01155 002 SFILLS: .BYTE 2 CONTAINS # OF FILLER C TERS REQ UIRED 
417 001156 Ole SFILLC: :BYTE 12 INSERT FILL CHARS. AFTER A “LINE F 
418 901157 000 STPFLG: BYTE : js eTERMINAL AVAILABLE” FLAG (BITca? eae YES) 
430) ae . t:WHI (SRE wen TAINED 
uss Sot ed 900000 REGr; Wo 5 Hoe ( SREGaD 22) 
423 O01166 o90000 TIMES: 0 t MAX RUMGER OF ITERATIONS 
use OBTTIS or? Seige ASCIT 797 sHESCE Eat ERROR a 
496 901173 015 SCRLF: Bett «15> >: CARRIAGE RETURN 
427? 001174 o00012 SLF (12) ‘LT 


$ ° ‘ F 
bya) ; HEEB HEEB UHHH HEHEHE HEE HHE HEHEHE HEHEHE 


eee es ee ~ - 
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7 -SBTTL ERROR POINTER TABLE 
“ ST cour NS INFORMATION F CAN 
a athe NEORRA I oBtatneD BY Uetnc Phe Tho THO WUPRER RUPERT OUND N 
4 iaLoca ION SITEMB. CATES WHICH I TABLE IS PERTINENT. 
434 Es: IF ati is 0 TM Y_ PERT NENT D Data (SERRPC). 
. ;#NO EACH ITEM IN CONTAINS 4 RS EXPLAINED AS FOLLOWS: 
4 ;# ;;POINTS TO MESSAGE 
4 i ;;POINTS 1 T 1) HEAOER 
439 :# T ;;POINTS TO T 
ma 3% OF ;;POINTS TO THE bara FORMAT 
, We 
443 001176 SERRTB 
444 
445 ; ITEM be 
ma | poe Si E3es 1 ;STATUS REGISTER IN ERROR 
447 O01 12742 DH1 sERRPC DRADD ees Ores Desc teD 
na. Rigas 3i OT! ;SERRPC DRAOD 
1204 0 
450 
451 ;ITEM 2 
2s pt Hees EMe 3 INPUT REGISTER IN ERROR 
1210 013003 DHe ;ERRPC DRADD INPUT EXPECTED 
454 OOlele 013176 DT1 : $BDDAT SGDDAT 
455 001214 000000 0 
Wee ;ITEM 3 
458 001216 012403 EM3 ;OUTPUT REGISTER IN ERROR 
459 O0le2e0 013044 DH3 ;ERRPC DRADD OUTPUT EXPECTED 
460 O0lece 3176 DT1 ;SERRPC DRADD S$B8DDAT SGDDAT 
461 O0l224 0 
462 . 
463 ;ITEM 4 
464 001226 012434 EM4 ; INPUT FAILED TO INTERRUPT 
465 poise see DH4 ;ERRPC AD 
465 O0le2 1321 DT4 ; SERRPC 
m4 001234 000000 0 
469 ;ITEM «6S 
470 poles 01 EMS j OUTPUT FAILED TO INTERRUPT 
ies fee — 
ve ies Hae 
475 ;ITER 866 
476 001246 012521 EMG ;UNEXPECTED INTERRUPT 
477 001250 013105 DH4 ERRPC  DRADD 
478 O0leSe 013210 DT4 ; SERRPC 
479 001eS4 000000 0 


—— —--——- -——-- —- - oe eo 


» & 

— . 

Fe > 8 RR 

moe LE 

-— ow bee 22 

; eB 

e we ¥F 
e = es S a5 us 
of i oe ie agi 
= s i) a a 
So: - se mas 


. 
’ 
. 
, 
. 
’ 
. 
s 
° 
s 
° 
9 
, 
’ 
’ 
5 
’ 
’ 
’ 


BEE. oFsE, =EZE. : we See 5 a 


Perera eee sa 
a ee eee : 


Sa ees eee 


eee  BSN5 her Sat nee Meine amamtree 


Soe Kae hawk loo) , mam ham a) Som em kame hoe) o000 oe eee eee] etatalatalalat=tat=lalatatststat=) 


SSSSSSSESES8S 


ay POV PETES FGRER REESE OSE 
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see 
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rr 


0+ 0 0 Od bp oe 
mu 


£LEE 


BERS 


=o 
ye oe a 


FEGGA SARTRE Te 


2 Banat hss 


ul 
~ 
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SRoNe EGE 


row ur 
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177777 


BI 
014 
01 


ooco10 


26h 


888s8 
Eee 


Pa Mert he ieee Ge ee 


; DIGITAL I-0 LOGIC TEST 
Se congue “fcr * Ypeenmtmamen “anions mae“ ene 


GIN: CLR RO sCLE 
RBEG 
BEGINI: MOV #-1,RO sLOAD RO 
RSEG: RESET 
HOV BSTACK SP +LO8D STACK 
Hoy ae Oe STaRTING ADDRESS 
23: TST Tes , 1F 
ik ie iexdsr ea TEST ADDRESS 
2 
18: CMP (SP)+, (SP)+ PoP STACK 
TST R3 ST IF FIRST DOES EXIST 
HALT TFIRST OR11=K DOES NOT EXIST 
CHECK THE PROGRAM DEVICE AODRESS 
38: DEC R3 :ADJUST R3 
MOV R3, NMBEXT :SAVE THE NUMBER OF ADDITIONAL DRL1-K 
MOV 8b as4 ‘RESET BUS ERROR 
CLR ast 
RBEGI: RE 


1: SET 
-SBTTL INITIALIZE THE COMMON 


TAGS 
;;CLEAR THE ach TAGS ($CMTAG) AREA 
MOV MT 


AG, R6 ifl T LOCATION TO SE CLEARED 


CLR t )+ :;;CLEAR MEMORY LOCATION 
CMP #SWR,R& ;;DONE? 
fice Pete TE Stack 

ACK , SP ;;SETUP THE STACK POINTER 


8s 
s SINITIAL STE A FEW VECTORS 
MOV SSSCOPE a :;I0T a ere FOR SCOPE ROUTINE 


MOV 840 galorve 
CTOR FOR ERROR ROUTINE 


MOV 8340 Ngee. PO EVEL? ' 
SENOCT. SEOPET ::SETUP END-OF-PROGRAM COUNTER 


CLR STINES :: INITIALIZE NUMSER OF ITERATIONS 
€LR SESCAPE CLEAR THE ESCAPE ON E 5 
al, SERNAX :3ALLO ERROR PER TEST 
. ;}INITIALIZE THE LOOP ADDRESS FOR SCOPE 
PE TUP THE LOOP ADDRESS 
;;SIZE FOR A HARDWARE SuITcH REGISTER, IF NOT FOUND OR IT IS 
*:EQUAL TO A “=1 TUP FOR A SOFTWARE SWITCH REGISTER. 
MOV DRERRVEC, -(SP) + 3SBVE ERROR VECTOR 
MOV 864S, a8ERRVEC ::SET UP ERROR VECTOR 
MOY #OSWR, SWR :: SETUP FOR A HARARE SWICH REGISTER 
MOV sODISB DISPLAY 33 AND A HARDWARE SDISPL ISPLAY REGISTER 
CMP =1, SWF TRY TO akon RENC ik 
BNE 663° ? :BRANC TYREDUT TRAP OCCURRED 
;;QND THE HARDWARE SWR IS NOT = -] 
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COMMON TAGS 
000403 6S$ ;;BRANCH IF NO TIMEOUT 
127 001872 64S: roy #65$, (SP) ;;SET UP FOR TRAP RETURN 
000176 O01140 65§: a ::POINT TO SOFTWARE SWR 


127 69:74 On142 5 Siepete sn DISPLAY 
1535 BapdoY b6S: NOV ef 14, Q8ERRVEC ;;RESTORE ERROR VECTOR 








Le ee ere 
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DZORGC.P11 IN ITIALICE THE COMMON TAGS 


cooc4e } -* fg FFF eo UNDER A MONITOR 


TEST RO 
2 IF CLEARED 
003316 : IOTEST . md IF SET 
001736 : +3 TYPE ASCIZ STR TRI ING, 
67§ ::GET OVER 
: (15><12><15>«12>/OR11-K BTcITaL i z OUTPUT LOGIC TEST/ 


70$ s;TYPE ASCIZ STRING 
9$ “GET OVER THE Asti 

¢15> «12> /MAINDEC@11-DZDRG-C/< 15> <1) 

NMBEXT, -(SP) 

2 

725 5s TYPE AS ASCIZ STRING 

1g *GET OVER THE ASCIZ 

718) ADDITIONAL bases Pee S CONNECTED/ 

74S 5; TYPE ofegiZ uaTRING 

3S : GET ASCIZ 

(15><12>/SET swrtex REGISTER BITS EQUAL TO THE NON-LATCHING SITS’ 
765 ; TYPE ASCIZ STRING 


2 : ttGET OVER THE ASCIZ 
(15)<12> DEPRESS CONT. / 


BURR EORE ES 


HALT IT FOR OPERATOR 
GET VALUE FOR SOFTWARE SWITCH reitcter 
TST aste SARE WE R NING UNDER XXDP/ACT? 
: BRANCH IF YES 
Hay SWITCH REG SELECTED? 
me ::GET BET SORT SUR SETTINGS 
#1, SAUTOB ape AUTO-MODE INDICATOR 


JSWR, NOTLCH SAVE SWITCHES 
80s" $3 TYPE astlzZ STRING 


9$ “GET OVER THE ASCIZ 
TE) «12> /SET SuIteH REGISTER BITS EQUAL TO THE INTERRUPTING BITS” 
825 53 TYPE ASCIZ STRING 

BR 1§ VER THE ASCIZ 

.ASCIZ CLE» «12> DEPRESS Ager 9 


6 
§ 
-) 
& 
& 
6 
6 
& 
§ 
6 


= b= b= b+ 60 bs 2 2 b-2 be 
WO VIOUS WtuE~- - 


BRS Noe Reees 


HALT WAIT FOR OPERATOR 
GET VALUE FOR SOFTWARE SWITCH pebisTer 
TST asde +108 UNNING UNDER XXDP/ACT? 


BNE 3$ AT 

000176 CMP Pa , SSWREG BOF THAR SWITCH REG SELECTED? 
GTSWR :;GET ET SOFT SUR SETTINGS 
BR 84S 
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DZORGC.P12 GET VALUE FOR SOFTWARE SWITCH REGISTER 


112737 000001 901134 at #1,SAUTOB - ;;SET AUTO-MODE INDICATOR 


017737 176436 00133 JSWR, INTBIT ITCHES 
Low, o0eSi2 TRING 


bes Fe fees 
7 sunist Reg! TER BITS Cte -12 EQUAL TO POSITIVE INPUT BITS, 


002616 aSe® Higer OVER tHE As ASCIZ 
 -98¢: «15><12>/DEPRESS ‘iSHT 


HALT 

3 VALUE FOR SOFTWARE SWITCH REGISTER 

TST gue 3 ARE We ene NG UNDER XxDP/ACT? 
SWR, SSWREG  SuTTCH REG SELECTED? 
90$ ANCH FND 
905 GET SOFT-SWR SETTINGS 
#1, SAUTOB ;;SET AUTO-MODE INDICATOR 


aSWR, MINSIN MINUS INPUT 
aes 3 TYPE ebtiz. STRING 


-GET OVER THE ASCIZ 
21S) «12> /SET switeH REGISTER BITS 15-12 EQUAL TO TRANSITION INPUT BITS/ 
943 s;TYPE ASCIZ STRING 


BR 3$ “GET OVER THE ASCIZ 
"ASCIZ <15><12) DEPRESS’ CONT. / 


£0 
2 
663 
6&4 
665 
S66 
667 
668 
$69 
670 


o 
~J 
o-< 


HALT 
: GET VALUE FOR SOFTWARE SWITCH REGISTER 

oooc4e TST ase ;;ARE WE RUNNING UNDER XXDP/ACT? 
001140 ae CGE. SSUREG + OTE TKARE SWITCH REG SELECTED? 

BNE ae’ + BRANCH Fe 4 

Gr sas CET SOFT-SWR SETTINGS 
000001 : #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
176650 ’ JSWR, TRANST ;SAVE SWITCHES 

DET RY INE THAT THE OPERATOR R DID. NO NOT MAKE A LOGICAL SWITCH ERROR 

910009 V $60 EST BIT 
1124 001 : thest IF NEG INPUT BIT 


BEQ 11 
001124 50 TEST st tat INPUT 


al PER E'NEG. AND TRANS. AT THE SANE 


MEntIL DONE 
003142 ;; TYPE ASCIZ STRING 


BREE GREE del total tabnt 


001366 
001124 





ee - 
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OZDRGC.P11 DETERMINE THAT THE OPERATOR DID NOT MAKE A LOGICAL SWITCH ERROR 


02 003140 o00434 - «GE R THE ASCIZ 
708 vam ii 38s: eRscrz 28, c12>/ser curtige Regt TER WITH THE DESIRED PROGRAM OPTIONS, 
01 003240 "TYPE 1 5: TYPE 12 STR 
re Mee AND ar ois Fhe a 
‘ jj 1008: LASCIZ § <15>«12>7 ss AgET 7415) < 12> «12> 
oe 4 900000 "HALT T FOR OPERATOR 
10 P .SBTTL GET VALUE Afar SOF TWARE SuITCH metisren aa 
718 ea ior 001140 000176 CMP a #SWREG $F BRANCH Fey TCH REG SELECTED? 
ote Besse Bsiobs SNE 1028 + BRANCH TF NO 
zis 003304 104406 GTSHR ain GET SOFT-SWR SETTINGS 
ei eeath eras 00000: 001134 1018: MOVE #1, SAUTOB :;SET AUTO-MODE INDICATOR 
? ite IOTEST: RESET | 
a a eo UE 
7e2 903334 oa? TieTES 001314 stn HOV : NMBEXT ; NBEXT ber eab SA ILABLE 
003344 0002 #232, Re . ipa 
$5 093350 ft I Bpos35 V #230,R1 LOAD R1 
726 903254 010221 c$ Re, (R1)+ sLOAD .+2 
80 903356 0S0e CLR Rl : sLOAD HALT 
729 Bessey 005722 TST (R2)+ TBONP 
730 003364 Oe02e7 001076 CMP R2, #SCMTAG-2 TEST FOR LAST 
731 003370 001371 ; BNE S$ ?BR UNTIL DONE 


me es ————— 





Ic = a ae re ee a ofPekd! E71 788) 21-SEP-76 13:09 PAGE 19 


IOTST1: RESET 
JSR 


S 
oe 
o- 
<5 


;SET UP BUS ADDRESS AND VECTOR 


SETADD: AO st OR 1ST ADDRESS 
MOV I LOAD 2@ND ADDRESS 


L000 3RD ADDRESS 
;LOAD 4TH ADDRESS 
;LOAD FIRST VECTOR 


5888 


= 


888s 


;LOAD 2ND VECTOR 


Merron 


8 88888 


R PC 
IOTTS1: fs ;LOAD BR LEVEL 


;SET MINUS INPUT. BITS 
jSET TRA pTTON INPUT BITS 
3L ST 


;RESET INPUT VECTOR 
;RESET OUTPUT VECTOR 


CLR aGR 
A HHHHHHHHHHHEHEHHE HE 2 2 HHBHHH HEHEHE HEHEHE 
E TEST FOR NO BUS ERROR 
i aSosbeessysetsbtansasoetsisssonoesssessennssenseneenten 
CLR AGRSTAT 
CLR aGROAT 
CLR JGROIO 


iilest 2 TEST THAT OUTPUT REG. CANHOLD #1 


T OUTPUT REG. CAN HOLD #-1 
” aay jpeanatnnammceny aanmnanr ices noactaaaenaa aaa ni canis 


;LOAD EXPECTED 

ALL ONES TO REGISTER 
; READ OUTPUT REG. 
COMPARE 


sseeee 
Pepe EeeR 


SS 


2 


DZORGC 
33 
fe 
re 
re 
ré 
740 
741 
ra 
744 
745 
746 
747 
748 
749 
750 
731 
7Se 
7 
735 
el 
758 
759 
760 
761 
762 
763 


ES ened 


ue 


ti 


1401 BEQ +3 éouaL 
104003 3 ;REG WILL NOT HOLD ONES 








H0e 
Buda of "SEHR SL SRD Et SETH OH rae a 


Pee isisinch a eine inner at tae cant tr eS 


cComomwMmMmcmmmdqa 
ee 
—OWONMUCWMe-O 


BRASS 


Se 
2 


stated 
Bad 
a 
= 


She ee 
ae 


—W) 
£°* 
Su 
b= 
-_— 
8 
— 
2 


BSE 
das 

nia 
ati 


ee es 


001166 
175424 
001126 


5 REERRRRAERE REE ELLE AEE E ELLE EA AEEE EERE LEAL AAS EAE EERE LE ERE EEE 
T THAT T CLEARS OUT 


jitstteteeronennesenneensnesessesensnenseennenseeesnntnanseeesss 
;;D0 40 ITERATIONS 


TATEST 3 
SC 
MOV #40, STIMES 
CLR T 
HOV. #-1, GRDIO 
MOV 10, SBDDAT 
BEQ ST4 
E 3 

rest 4 
ay 52525, $GDDAT 
MOV SeRoTS" 
CMP SGDDAT, SBDDAT 
BEQ TSTS 
ERROR 

tf 

+é Sc 
MOV 25252, $GDDAT 
MOV #125252, JGRDIO 
MOV 10, $BDDAT 
CMP $GDDAT; SBDDAT 
BEQ 
ERROR 


;SET DATA TO ALL ONES 
:READ OUTPUT REG. 


3;BR IF EQUAL 


;REG FAILED TO CLEAR 


2 gr area ee gh ea a oS ccc 
TEST THAT OUTPUT REG. 


i apeeeteguegveseennennessnenseennasieasennenneesnenteaseestesse# 
;LOAD EXPECTED VALUE 
;READ OUTPUT REG. 


5;BR IF EQUAL 
SDATA NOT=52525 


iteer © TEST THAT OUTPUT REG CAN HOLD else 


T OUTPUT REG 


CAN HOLD #12S2eS2 


eg —> > pena ame ataaaaa aca ae er tt gamenarar iran ets 
;LOAD EXPECTED VALUE 


;READ OUTPUT REG. 


::BR IF éguaL 


;DATA NOT=1eSeSe 


1 mma ea eae 
6 HAT OUTPUT REG. CAN HOLD A COUNT PATTERN 


TEST 

tots 
MOV 
MOV 
CLR 

es: MOV 
MOV 

’ CMP 

BEQ 
ERROR 

1$: INC 


| apeteseaeenenensaunraneanscaneanesieeanensntentenneententents 


;;D0 4 ITERATIONS 


;;BR IF bg 


i CPEAR PA ee eae RETURN 
;LOAD THE vOOTPUT REG. 
sREAD THE REG. 

COMPARE 


UAL 
;OUTPUT REG.FAILED TO HOLD COUNT PATTERN 
sUPORTE. THE P PATTERN 


2 
n 


Suiza 


SOREL e BOR TER ESS aaR Lome CABINS RS Soe : 


5 


ps be b 2b b+ p= pop 


Fi SRBRES 


2993 89 Se9e¢ 


S 


er oe ee ee 


sReagRaRaEE 


HVS IAIIIIA 


— 
OQ 

Lew 
Re 
Wen 


wee ee ee 


Ic be cmmg 1” <1 -07080-¢ 


ACROSS. THE OUTPUT REG! gtepe-76 M nt ats 


001110 
001124 


iis 
Ooi 


001126 


001126 
001126 


fy RARARARKSRAALAS AE LLLALASALALAAAAELLLAAALALAAAPLA FE LELALAAARLL ELS 
TEST 7 ACROSS THE OUTPUT REGIST 
Ws By can SNe taaalt wet etna 


té17: 


MOV sa toc sepoarT itOAD EXPEETED VALLE O 
A eee eet 

CMP SccDAY’ $8008 Feet RPeULTS 

Bo, 8s 'eR IF EQUAL ? 
28: ASL —« SGDDAT SHIFT EXPECTED DATA 


see tered terrereneeneanennanenesd teen eniensnieneenentens 
es aa 


tét1 


#1$, SLPERR ;LOAD SCOPE ERROR RETURN 
#81 TO, SGDDAT, LOAD EXPECTED VALUE 
1S: MOV -1 OGROIO ;LOAD OUTPUT TO A ONE 
f SopR0T . 9GRDIO TREBD OUTPUT REG 
COM $BDDAT _ sCOMPLEMENT IT 
CMP GODAT , SBDDAT : ? 
BEQ IF EQUAL 
ERROR 3 
23: ASL $GDDAT ;SHIFT LEFT —_- 
BNE 1$ ;BRANCH UNTIL DONE 
© KEKKERERLLAEARALE RASA E SEA AL HEAL ALAS HLL RLASKS RASA SESE RELA ESSSSEE 
hr TEST 11 TEST FOR SLOW OUTPUT GATES WITH #l2S2eS2 


DR BO Ria 


tri 


MOV #1 ;LOAD EXPECTED VALUE 
MOV SappaT DeRD10 *LOAD OUTPUT 

COM JGROIO :C T T REG. 
COM IGROIO : MENT OUTPUT REG. 
COM JGROIO “COMPLEMENT OUTPUT REG. 
COM IGROIO : MENT OUTPUT REG. 
COM JGROIO ++ COREL NT OUTPUT REG. 
COM JGROIO * ONPLENENT OUTPUT REG. 
Kono BeRDIO ‘See ‘output Ree: 
MOV JGRDIO, SBODAT G. 

T, SBDDA 


SUOTSTERS 
BR IF ines 
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DZORGC.P11 Tle TEST FOR SLOW OUTPUT GATES WITH #SeSeS 


iteet ia teat FOR SLOW OUTPUT CATES WITH 


sites TEST FOR SLOW OUTPUT GATES WITH 
je M MP d. e 
gov332 Mee tét12: SCOPE 
234 Ol 052525 001124 MOV #52525, SGDDAT sLOAD EXPECTED VALUE 
tees 01 4s o011¢4 174760 MOV $GDDAT, JGRDIO LOAD OUT REG. . 
Gnses OBI? IPa7ep cin Sen013 iretErent SurPut FE. 
Doses atte rates con 36019 HEORPLERENT OU RES. 
374 m8 177 1747 COM Het SE OMPLEMENT SUTPY ur S. 
ate 17? i7uzed con IGRDIO ; COMPLENENT OUTPUT REG. 
10 Nee 74714 901126 MOV SeRD TS, SB0DAT TPAD BUTPUT G ; 
16 O2 1124 001126 CMP $GDDAT’ SBDDAT “TEST PATTERN 
oowes 00140 BEQ TSTi3 :;BR IF EQUAL 
a | ERROR 3 é sOUTPUT REGISTER IN ERROR 


; itest 13) TEST THAT OUTPUT CAN HOLD LOW BYTE COUNT PATTERN 
: &TE TEST THAT OUTPUT CAN HOLD LOW BYTE COUNT PATTERN 


stateless remtchenbiematti=> 


fs MN TD 
004430 00004 +4713: SCOPE 
004432 012737 OO0400 001166 #400, STIMES 3;D0 400 ITERATIONS 
OO444O 012737 O04462 O01110 MOV #2$, $LPERR LOAD SCOPE ERROR RETURN 
bowie 012737 OS2400 001124 MOV #52400, SGDDAT :LOAD Exe ECTED DATA 
013777 001124 174646 MOV $GDDAT; aGRDIO 
004462 113777 001124 iHe40 2s: MOVB § §$GDDAT, IGRDIO THe OUTPy 
po4470 17737 174634 001126 MOV JGRDIO; SBDDAT Loe 
76 Oe1i2s oO01126 CMP $GDDAT, SBDDAT 
Oo4s04 001401 BEQ 1 sBRANCH IF EQUAL 
104003 ERROR 3 ERROR QUTPUT REG. IN ERROR 
004510 105237 001124 1$: INCB  $GDDAT “UPDATE PA 
310 004514 001262 BNE 2$ 
Sle itesT 1d TEST THAT OUTPUT CAN HOLD HIGH BYTE COUNT PATTERN 
913 ETEST 14 TEST THAT OUTPUT CAN HOLD HIGH BYTE COUNT PATTERN 
914 SKLRERELA KEKE KEK RAR KARL E ARE KRELKSH SHAKER KELL KK KARA LFESRHEREAALERE 
815 OO4S16 OOD004 +éT14: SCOPE 
916 004520 012737 OOO4OD 001166 V 8400 STINES ;;D0 400 ITERATIONS 
917 OouSet bie? 37 o04S50 901110 MOV ;LOAD SCOPE ERROR RETURN 
918 012737 O00252 001124 MOV LOAD CTED 
ee Bes (ler GE ee os, File MEET LO tb 
2 017737 1 fe bbtise V schb10 $85 2 : OUTPUT REG. 


2 
Bowers | T0403 ERROR if ERROR, QUTPLY REG. IN ERROR 


004S76 105237 001125 1$: INCB $GDDAT+1 
004602 BNE es 


SSS 
8 
y 
3 
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327 © KEAERAREARERAREAALAALRA RASA ALEAARERALAA LAA ARED SLE RALAA RRA SLES ES 
328 T1 EST OUTPUT DATA ACCEPT FLAG 
:  KLKAKKAAKSRARARLLAAA LAA KAE LARA RAL SK ALAA SAKE RELALHALELRALELALEE 
930 o04604 o00004 TIS: 
35 GONE 005077 174si6 . JGRDIO 
le Ol 1 174506 MOV #-1, JGRDAI 

1 100000 Oi 124 MOV siti , SGDDAT ; LOAD EXPECT ED 
a4 1 190009 0 MOV agit ,9GRSTAT izes BIT 
aa ; o01124 BOLLE BT cooeT, tse a 
a3 Ooiess B81001 BNE if ;;8R IF on 
338 652 104001 ERROR sERROR, BIT 15 FAILED TO SET 
940 + RLAAKARKAALAARALLAL ARE LLAL ALARA ALLA AARAA RELA LRALALA LRA A RELA EREE 
341 i ktest 16 TEST OUTPUT INTERRUPT ENABLE 
aye © SKLEKRAREARERAERA LESSER LEAH AEA L ALA LES RA ERHEAAELS LEASE RAKE LASEEE 
i SRS eae ee 
g4y4 174442 ;CLEAR STATUS 
94S 004662 012737 O40000 001124 MOV 4, S$GDDAT . sLOAD EXPECTED 
ab 70 bige7? 040000 - 174426 MOV a8] TIM auReTR OGRSTAT. sLOAD BIT 14 
oy soe OS boiisd OOLiSe BT DAT, f S00RT — 
aug rita: 1001 BNE tS? ;;BR IF SET 
320 004714 104901 ERROR ;ERROR BIT 14 FAILED TO SET 
eS : itect 1?) TesT INPUT DATA EPOV lam eee 

:&TES TEST INPUT DATA READY FL 

gsy ceateeneaeenstateacentonneasnenteessen eee seaaeasteaneestenss 
955 004716 oOD0004 +éT17: SCOPE 
856 004720 012737 001124 MOV #8177, $GDDAT ;LOAD EXPECTED 
957 004 012777 O00200 174370 MOV #BIT7; OGRSTAT_ :SET BIT 7 
958 004734 017737 174364 001126 MOV | :READ RESULT 
959 004742 023737 001124 001126 CMP scnpaT $abpat -C 
960 004750 001401 BEG TST20 :;BR IF EQUAL 
31 004752 104001 ERROR sERROR, BIT 7 FAILED TO SET 
363 + SHEAR AKRAAKERARA LALA AAASAA LA LASALLE HERA RAL AAAE LAER ARERAAAAEREEE 
Tar) tkTEST 20 TEST INPUT INTERRUPT 
G65 , HEUSHERSUSSESUSSRESESSRESUAERERESRERESRRRERE REESE SERRE SEETES 
966 004754 O00004 SCOPE 
97 004756 005077 174342 CLR STAT ;CLEAR_ STATUS 
968 004762 012737 OO0100 001124 MOV #B1T6, SGDDAT sLORD, EXPECT ED 
969 004770 012777 O00100 174326 MOV #BIT&. IGRSTAT :SET BIT & 
870 004776 017737 174322 001126 MOV IGRSTAT . SBDDAT >READ RESULT 
971 005004 023737 001124 O01126 CMP $GDDAT , $BDDAT * COMPARE 
972 O0S0i2 001401 BEQ TST21 ;;BR IF EQUAL 
§73 005014 10400 ERROR sERROR, BIT & FAILED TO SET 


wo 
N 
+ 


_ — + Se 


OR11-K LOGIC TEST MAINDEC-11-DZDRG-C 
OZDRGC.P11 


nthaaiaiitaaesteetieddhannatianeaitol 


QoOoOOOON00N000 
ee ee ee ee ee ee 
WONWUILE WO 


b+ b+ bh bb = Oo 2h = 2 8 b= hh hh he pe 
SR 

ial) he 

tT 


Cs 


005016 
20 


Soetse 
toes 
sete 


oor 


Tel 


000004 
es 
ita 
9177 


001401 
104001 
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TEST THAT RESET CLEARS THE DIGITAL STATUS REGISTER 
i Oe pea py pg ga 


000040 
17427e 
001124 
140300 
174252 


001124 


001166 


174260 
001126 


174050 


174142 


tits 


el 


MOV 
CLR 
CLR 


MOV 
RESET 
MOV 


BEQ 
ERROR 


THE DIGITAL STATUS REGISTER 


*TEST TEST THAT RESET CLEARS 
[epee Rea nesenehteaeieense teed neseeaeseneoEnHEAE ne HE HEAT 


pa CBS TINES ;;D0 40 ITERATIONS 
;CLEAR ata 


ea *LOAD 
#BITIS!BITI4!BIT7!BITE, JORSTAT 
JGRSTAT, SBDDAT -READ RESULT 
TST2e 


;;BR IF EQUAL 
sERROR, RESET FAILED TO CLEAR DIGITAL 
*STATUS REGISTER 


— 


bitestT a2 tect EXTERNAL TRANSFERS ~ COBLE MUST BE CONNECTED 
: 


OS eg oa a agmammee <r eer pecepipamemenen ERO TY 


téT22 


1S: 


BEQ 
JMP 


CLR 


BEQ 
ERROR 


TEST EXTERNAL TRANSFERS - CABLE MUST BE CONNECTED 


#91710, 3SHR sTEST SUITCH BIT 
DRT21 BYPASS TEST USING THE EXTERNAL CABLE 
10 ;CLEAR OUTPUT REGISTER 
#-1, IGRDAI *CLEAR INP 
$GDDAT sCLEAR EXPECTED 
0, IGRDIO *LOAD THE OUTPUT 
1,$ *READ THE INPUT 
ODDJMP, SBDDAT : MASK 
T’ T : COMPARE 
3 ;;BR IF EQUAL 


;ERROR, INPUT DID NOT EQUAL THE OUTPUT REG. 


a Ur beat ae eee 


TEST 23 TEST INPUT WITH 
| eabea NE aeaaeaaeacenttaesanteatedeesaeneanenneaeancennanaaaiany 
CLR JGRDIO ;CLEAR OUTPUT REGISTER 
NOY oat ScbbAT iPbag cAPEC TED 
BIC SOBs SCODAT 
HOV SGDDAT, 9GROIO ;LOAD THE QUTPUT 
BIC SBDINP’ SBDDAT Rack 
CMP $GDDAT’ SBDDAT * COMPERE 
BEQ TST2 :;BR IF EQUAL 
ERROR ERROR, INPUT DID NOT EQUAL THE OUTPUT 


2 
* 
—— 
“3 


SRO O OES 


b+ + 0-= b= 6 - b= op pp = p= 


BSS SRA FOR HORE URROONS 


+= b= b= P— b— & — b— 6 P— 0 - b-+ B -  P  p  e 


a 
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fp RERRARELERA REESE EE RARE AA ALA AALAAAAL ALARA RE RES AR ERERELALA LESS ERES 
:RTEST 24 TEST INPUT WITH #5 


1 Nge —" * pempengagennc op se ar terrence ae na re Repay 
F IGROIO ;CLEAR OUTPUT REGISTER 
*CLEAR INPUT 


P 


ee 
es 


we 
bs be 


ae 
22eg0 
dae 
3 
= 
o 
a 
E 


3 ? 001360 001126 BIC ODDIMP,SBDDAT - : 
rey 001124 CMP $c00AT, £ : COMPARE 
i4 001401 BEQ ;;BR IF EQUAL 
005316 i04002 ERROR 2 ;ERROR, INPUT DID NOT EQUAL OUTPUT 
5 5 RRRARRRARREREAAA AL AAAAAALA AER LAL ARAL LALA EAE LE SELL LE RAE RASS ERA EEE 
:KTEST 25 TEST INPUT WITH #125252 
© © KEKEAEKAKEREHALERA LAA LER E REL EARAALARAAA LEA SEERA RE RA RAL REA LEAL AEKE 
005320 oo0004 - t$T2S5: SCOPE 
005322 005077 174002 CLR 10 ;CLEAR OUTPUT REGISTER 
005326 ble??? 177777 173772 MOV #- :CLEAR_INPUT 
005334 012737 1eSese 124 MOV be *LOAD EXPECTED 
005342 043737 001360 (CO1124 BIC ODDIMP, $GDDAT MASK 
005350 013777 001124 173752 MOV $GDDAT, “LOAD THE OUTPUT 
005356 017737 173744 00'126 MOV JGRDAI ; SBDDAT "READ INPUT 
005364 043737 001360 001.26 BIC DDJMP; SBDDAT MA 
005372 023727 001124 OOllee CMP $GDDAT? SBDDAT : COMPARE . 
005400 001401 BEQ ST2b :;BR IF EQUAL 
po05402 104002 ERROR 2 ;ERROR, INPUT DID NOT EQUAL OUTPUT 
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DZDRGC.P11 Te6 TEST THE NEG. AND TRANSITION LATCHING INPUT DATA BITS 


; RHAAAAARLLA LEAL LE LALA LEL LAA LAL LALA LA ALSS RERRAARLERLLLL AALS SEAES 


1 
128 iktesT 26 TEST THE NEG. AND TRANSITION LATCHING INPUT DATA BITS 
1054 Rei riLriitirrreriiiiiterritisirisrerertritrecroned, 
1 go9004 tét26: SCOPE | 
1 1 000001 001166 MOV #1, STIMES ;;D0 1 ITERATION 
1 14 001380 « TST ODbIMP “TEST IF ANY ODD JUMPERS 
1058 420 1361 BEQ Tote? :;BR IF NONE 
{ 054 aa9737 es artes 1s art SHB’ Seppe mt ihest Fo BUMPER BIT 
ie es i 001334 001124 Fo ‘woe pane ST FY pone INPUT BIT 
af ' 
Obs DOSE Boi Be Sgt ils IF NOT" 
1064 9054S0 Ol 001124 173652 MOV $GDDAT, IGRDIO :LOAD OUTPUT ; 
1065 01 77777 173642 MOV #-1,SGRDAL CLEAR INPUT 
1066 4 O L1e4 173636 BIC , AGROIO :CLEAR T BIT 
1 4 1 173630 001126 MOV JGROAI ; SBDDAT *READ INPUT REG 
1088 005500 023737 001124 001126 CMP $GDDAT; SBDDAT :C 
1069 005506 001401 BEQ 35 BRIE IF EQUAL 
1070 005510 104002 ERROR 2 INPUT OR NEG. TRANSITION 
1071 ' Se Nput ad FAILED TO SET INPUT REGISTER 
1073 O0SS1E 033737 001124 001362 3s: BIT S$GDDAT , MINSIN TEST IF NEG. INPUT BIT 
1074 005520 001016 BNE pe F 
1075 012777 177777 173576 MOV #-1, IGRDAT CLEAR INPUT 
107% 005530 001124 173572 BIS SGODAT, IGRDIO- :LOAD OUTPUT 
1 017737 173564 001126 MOV JGROAI ; SBDDAT READ INPUT 
1078 005544 69737 001124 O01126 CMP $GDDAT, SBDDAT : COMPARE 
1 o055s2 001401 : BEQ 2g 'BR IF EQUAL - 

1080 005554 104002~—C; ERROR 2 “ERROR, POSITIVE INPUT TRANSITION 
1081 ‘LOGIC FAILED TO SET INPUT REGISTER BIT 
1083 OOSSS&6 006137 001124 23: ROL SGDDAT ;CHANGE DATA PATTERN . 

1084 O05562 103322 Bcc. ss 18 :BR IF MORE DATA 


LOGIC TEST. MAI £0-11-07086-¢ MACYLI 271732) P-76 13:09 PAGE 27 
Pil A 1 ACROSS NON-LATCHING I iT ITS 
jpeeeaneeeennenessnenenossnsesnernaaeesecenatsscesnestentesees 
: TEST 27 FLOAT A 1 ACROSS NON-LATCHING INPUT BITS 
jsustesaensaveepsesnanonensensneonennensssestonesuasaneenesaneos 


tit3°, 
#2$, SLPERR ;LOAD ERROR SCOPE RETURN 


ROTL CH, BRLEVS oat iSET ND NOneLaT “ 
ORO AEN as sos 


1$ Mae | IF O00 JUMPER 
$GDDAT,NOTLCH : TEST ie Daal 
1$ BR IF LATCHING 


S$GDDAT, IGRDIO L080 OUTPUT 
JGROAI ; SBDDAT BD INPUT 
BRL BeLEy 3. $80 + $8008 RK 0 LATCH BITS 
: COMPARE 
:;BR IF EQUAL 
2 s INPUT REGISTER IN ERROR 
WAS CORRECT LATCH/NON-LATCH SUPPLIED ” 
;SUB-TEST CLEAR THE OUTPUT BIT AND TEST THE INPUT DOES NOT LATCH 
3S: SGDDAT , IGROIO ;CLEAR OUTPUT BIT 
JGRDAI’ SBDDAT *READ INPUT 
BRLEV3; SBDDAT sMASK 9 CATCH BITS 
$GDDAT ; CLEA 
ERLEVe, , SBDDAT itESi TES? aR § 


INPUT SIT LATCHED IN ERROR 
;WAS CORRECT LATCH/NON-LATCH SUPPLI ED ? 


;CHANGE PATTERN 
;8R UNTIL DONE 


E 
ene oF 


=8 


1 
1 
1 
i 
1 
1 
i 
1 
i 
1 
i 
1 
1 
1 
i 
: 
i 
i 
i 
i 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
i 
? 
i 


Seam ee eS ES 
AT aU) ed aed ed ed ed Sed ed ed ed ed 
oto PUT -£ torus OB Ge 





pil LOGIC be 2 RT ks ata 


E 


>-- 0 -< 0-2 0 -- 0 -- b-- 6 -- 6 6 Bp 


; 


Bl Bes 


: 


: 


fo Romine Rion 
2H2h BLES BUSH FZ 


0+ 2 02 0 = 0 <= bo = BO 2 0 2 oo 2 2 2 ho Be B-* B-2 = Bho ho fo be 2 he fb b= 0 hb 2 bm Fo ho hb 0 ho Po bo 0 f—— Oho FH Po 
8% Ness 
N ™N 


PIAAIT ESR TORE OSE ASS Gk ESSA SABI ACES Be ION PERS 


=DZDRG-C__MACYLI_27(7 
I ACROSS LATCHING IN 


rest 30 FLOAT A 1 ACROSS LATCHING INPUT Bite 
L 


A 1 ACROSS LATCHING INPUT BITS 
Ly Deepen or per 


TEST 
tir 
MOV 

. CLR 

MOV 


2s: BIT 


1§: BIS 


ee TEST J] FLOAT AD ACROSS LATCHING INPUT Bile 


OAT A O ACROSS LATCHING INPUT 
i SO eet et rcs at 


j#TEST 31 
+6731: 
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#610, stoRT 
8-1, IGRDAI 

SGDDAT, NOTLCH 
$ oon, o0sNP 


soto » 9GROIO 


825 
setthe Berea 
acRoId 

8-1, IGROAI 
BRLEV3, NOTLCH 


1 
SGDDAT, ODDINP 
$GDDAT 
ROHL » $0087 
$GDDAT; AGRDIO 

JGRDIO’ 


JGROAI , SBODAT 
SGDDAT, , SE0DAT 


pri eva . 9GROAT 
pate 


SCLEDR OUTPUT REGISTER 
;READ INPUT REG. 


;;BR IF éSuAL 
; INPUT REGISTER FAILED TO LATCH DATA 


iro AD EXPECTED 

*CLEAR OUTPUT REGISTER 
:CLEAR INPUT 

TEST FOR LATCHING 

eect iF IF OOD JUMPER 
:BYPASS IF ODD JUMPER BIT 
;LOAD 

j MAKE ha 


;READ INPUT 
: COMPARE 


EQUAL 
sINPUT REGISTER FAILED TO LATCH DATA 







LS Perec SCOPE RE 


WELLE — 
ie “OUTPUT RE 
TEST FOR 7 ~ “eat 


el Pee, 


; CLEAR yt BIT 
:C TTERN 
;BR UNTIL DONE 


;LOAD ERROR SCOPE RETURN 


;LOAD OUTP 
; CLEAR SUTBUT REGISTER 


;CLEAR INPUT git 
;CHANGE PATTERN 
BR UNTIL DONE 
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TEST FOR SLOW I GATES WITH 81 


£ fy RSRRRERSRSRARAA SALSA ERASSRSARAAA LARA A KELL ARRAS RSLRALAAAS SLAG 
TEST 32 TEST FOR SLOW INPUT GATES WITH sl2eSeSe 
S  RESEE ESE ELSRSESESRHREEHLPSEPRERSE PRES HALLE RFHEESERGE SAPS SSF ESSE 
téT32: SCOPE 
125252 001124 MOV #125252, SGDDAT sLOAD EXPECTED 
001334 bOI 124 ae NOTLCH, $GDDAT : CONVERT 
001 0011 ODDIMP’ T : MASK 
001124 MOV $GDDAT; RO *  $LOAD PATTERN 
173052 CLR aGRO :CLEAR OUTPUT REGISTER 
1 173042 MOV #-1, IGRDAI _ CLEAR INPUT 
1 MOV RO 10 *  sLOAD_ OUTPUT 
17 CLR Bean TC. *CLEAR OUTPUT REGISTER 
173026 MOV SGROAI Ri :READ INPUT 
173022 BIS 1, IGROAI :CLEAR INPUT 
17301 MOV 10 ; OUT 
1535 CR | gGRBTO TAP EBR OUTPUT REGISTER 
173004 MOV JGROAT, Rl :READ INPUT 
173000 Bis RI, I :CLEAR INPUT 
172774 MOV RO, GRDIO sLOAD OUTPUT 
172770 CLR IGROIO :CLEAR OUTPUT REGISTER 
17272 MOV aGROAT,R1 *READ INPUT 
172756 BIS Ri, aGROAL :CLEAR INPUT 
l MOV RO, IGRDIO ;LOAD OUTPUT 
172746 CLR JGRDIO ‘CLEAR OUTPUT REGISTER 
172740 MOV IGROAT, Ri : NPUT 
172734 BIS Ri, aGROAT CLEAR INPUT 
172730 MOV RO, IGRDIO sLOAD OUTPUT 
172724 CLR SGRDIO ‘CLEAR OUTPUT REGISTER 
172716 MOV JGROAI,R1 : T 
172712 BIS RI, aGROAL :CLEAR INPUT 
172706 MOV RO, IGROIO ;LOAD OUTPUT 
72702 CLR IGRDIO :CLEAR OUTPUT REGISTER 
172674 MOV JGROAT,R1 : NPUT 
172670 BIS RI, aGROAI CLEAR INPUT 
172664 MOV RO, IGRDIO ;LORD_ OUTPUT 
172660 CLR IGRDIO :CLEAR OUTPUT REGISTER 
172652 MOV JGROAI, RI ; INPUT 
172646 BIS R1, JGROAI :CLEAR INPUT 
172642 MOV A JGROIO ;LOAD OUTPUT 
172636 CLR IGRDIO ‘CLEAR OUTPUT REGISTER 
172630 MOV JGROAI, RI : NPUT 
172624 BIS Ri, aGROAL :CLEAR INPUT 
72620 MOV RO, IGROIO sLOAD OUTPUT 
172614 CLR ach 0 sb AR OUTPUT REGISTER 
2b06 MOV GRDAI,R1 READ INPUT 
172602 BIS R1, IGROAI :CLEAR INPUT 
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44 006674 050177 
13 Qoeroe OL 
1269 
1270 O067ie 917701 
1271 006716 950177 
le7e 7ee 905100 
1273 7e4% 010077 
274 

017701 
276 177 









172316 


001126 





‘ATE 
+8133 


DR1i-K LOGIC TEST MAINDEC-11-DZDRG-C_ MACY11 27(732) 
T32 TEST FOR SLOW INPUT GATES WITH #125252 


CUM 
MOV 


CLR 


pee See ans 


21-SEP-76 13:09 PAGE 30 


Rg IGROIO 
IGROIO : 


Rae 


Bag 


Ri, RT OGROAT 


R1, SBDDAT 


SGDDAT , SBDDAT 
pie 


;LOAD OUTPUT 
‘CLEAR OUTPUT REGISTER 
CLEAR I 


eB REGISTER 


iRTEAR INPUT 


;LOAD READ 


OMPARE 
BR IF str 
sINPUT GATE SLOW 


i ee ee tt en ate ee 
TEST FOR SLOW INPUT GATE 2Se2S 


S WITH #5 


ietpeenpengessnnantesuenntensenseestenstenteastesseeseenstassens 


#52525, SGDDAT 


BigOOr BROS 
Bog B58 


BOovavwve) 
es 


Reon EXPECTED 
ran x eo JUMPER BITS 


~- que REGISTER 


i080 OUTPUT 
AR Mad REGISTER 
‘CLEAR INPUT 


;LOAD OUTPUT 

:CLEAR OUTPUT REGISTER 
READ INPUT 

;CLEAR INPUT 


TPUT 
;CLERR QUTPUT REGISTER 
READ INPUT 
CLEAR INPUT 
;LOAD OUTPUT 
; CLEAR ad REGISTER 
;READ_ INP 
; CLEAR INPUT 


;LOAD OUTPUT 


s CLEAR QUTPUT REGISTER 
INPUT 
CLEAR INPUT 
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OZORGC.P11 EST FOR SLOW INPUT GATES WITH #SeSeS 


1287 007010 CoM RO | 
1 007012 010077 172312 - MOV RO, IGRDIO ity 
1289 17e3 CLR 10 CLEBR OSU TPUT REGISTER 
1 7 l 1? MOV JGR LR T 
1e33 pasion eee" Bis Ri aaron sCLERR 
1293 1 172270 MOV RO, IGRDIO LOAD uA 
tea 172264 CLR IGRDIO | :CLEAR OUTPUT REGISTER 
l 17701 172256 MOV JGROAT, Ri READ INPUT 
155 Baas Beeiag t7eese 5 eR <meta 
Sg ie eae OR Be apenl lo if LEB OUTPUT REGISTER 
1533 BoSbeE bideoi teseaa ‘ SERDAL | READ I 
ee ea SOE paet 0 senate Bae Ba’ , CLEAR INPUT 
1303 007100 010077 172224 MOV RO, IGRDIO ;LOAD OUTPUT 
Be Brite So, tree BREA aap igayr” ISTE 
1308 oa7115 050177 172206 BIS Ri, aGROAT CLEAR INPUT 
1308 pe 160 nites 172202 MOV RO, IGRDIO sLOAD OUTPUT 
1319 prise bioro, 78178 Gh. gaUI0 sCLEPR OUTPUT REGISTER 
131i 007136 e072 172164 BIS R1, JGROAI *CLEAR INPUT 
138 ated nittrgg 172160 Mov 0 JGRDIO sLOAD OUTPUT 
1314 007150 005077 172154 CLR IGROIO CLEAR OUTPUT REGISTER 
1315 007154 017701 172146 MOV JGRDAI RI TRE 
1316 007160 050177 172142 BIS Ri, aGRORI * CLEAR INPUT 
a 
1318 
1319 07 166 910137 001126 Noy Ri, SBDDAT ;LOAD VALUE READ 
1321 007174 vat NOP 
1322 007176 o00240 NOP 
1323 023737 001124 001126 CMP SGDDAT, SBDDAT - COMPARE 
1324 007 001401 } BEQ TST34 ::BR IF EQUAL 
1325 007210 104002 ERROR 2 


DR11-K LOGIC er MAINDEC-1 7(7, 21-SEP-76 13:09 PAGE 32. 
OZORGC.P11 TEST THAT RE RESET CLEARS ine UF REGTSTER BITS 


1326 gt ‘ ; LLAALLAAALELRLALELRALAL EHS AALAA ALARA RAALLALERLLELERLAALAELALLS 


ATEST 34 TEST THAT RESET CLEARS INPUT REGISTER BITS 
5 EEE 989693 EE EE 9 9 EE J J A EE A EE EE 


tBr34: SCOPE 
oggo4g 001166 MOV oa ;;D0 40 ITERATIONS 
i7el ;CLEAR OUTPUT REGISTER . 


17207 _ CLEAR INPUT 
177777 1 SOE CLR OUTPUT 
001124 LOAD EXPECTED 


1720S2 001126 MOV SSDP’ pl ;READ INPUT REG. 


001360 001126 IMP : MASK J 
T3135 ;;BR IF ALL SITs ce BORER 
;INPUT REG. FAILED TO CLEAR UPON RESET INST. 


npeenessossnyyeseysenncononanennnnanennnennysnetegazesnien 


T UTPUTTING INPUT DATA READY FLAG SETS 
Mg 2" spgemmeanaepagcer: cen remmammanmcumanme ste at: ape: 


, #8117, $GDDAT sLOAD EXPECTED 
#0, IGRDIO ;OQUTPUT 0 
;DELAY 
IGRSTAT, SBDDAT *READ RESULTS 
S$GDDAT , $BDDAT + COMPARE 
36 >:BR IF EQUAL 
INPUT DATA READY FLAG FAILED TO SET 
TEST THAT WHEN THE INPUT BUFFER IS READ THE OUTPUT FLAG IS SET 
itect ae TEST THAT WHEN THE INPUT BUFFER 16 READ THE OUTPU 


TE TEST THAT WHEN THE INPUT BUFFER IS READ THE OUTPUT FLAG IS SET 
feenenbseageenneacuansanenneaneaneaneaneeneentenseatenteaseanea® 


001124 ROY sBIT15, SGDDAT .  ;LOAD EXPECTED 


tat 
171746 
ooco0d 


I, RO . READ INPUT 
001126 pee 3 ;READ RESULTS 
; INPUT DATA READY FLAG FAILED TO SET 


bh &~ b= & = 6 f= 


aL SA Aa ett Oban 


ti 


1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
i. 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
bf 
1 
1 
1 
i 
1 
1 





o— 
gas 


g 
Bx 
a) 


. 


S 
ro 


BB Ido sd 


ed 
yy 


> b— b= b= b= b- b= § = = B— 0 9 = 9 = = 8-9 9 fp 9 ph pe 


Pirinriemeriicet teeta 


tb 


HOS 


LOGIC TEST MAI G-C MACY11 27(732) 21-SEP- 
Pil 736 NEST ie cr ates4 THE Tibut guEFeR fd READ ve! SifeuT PoC S SET 
T THAT THE DIG 1/0 DOES NOT INTERR 
ig INPUT-OU ier : apis ggr NOP EANBEE RTERRUPTS 
007408 T21: 
 SLLARRSRAAEAALRA RASA KEARSE SA ALAA RS AA LEASE LALA SLESAARA RESALES LE SE 
ibtesT 37 TEST FOR UNEXPECTED INTERRUPT 
 SLAAERERA BAA LAAAAAAEAA LALLA AERELSLASAEA KERALA LE LRA LA LAAE ELSA EES 
gog004 +6137: SCOPE 
10 Ol 000040 O01166 MOV #40, STIMES :;D0 40 ITERATIONS 
007416 900005 RESET | 
007420 005077 171700 CLR IGRSTAT 
007424 905037 177776 CLR PS 
007430 012777 007510 17 V als aGRIVA ;SET UP INTERRUPT INPUT VECTOR 
007436 012777 000340 171676 MOV 340, aGR JGRIVSA 
007444 ble??? 007514 171672 MOV 2$, IGRI Ive ;SET UP INTERRUPT OUTPUT VECTOR 
0074S2 012777 O00340 I71&66 MOV cab IVSB 
007460 012777 900000 171642 MOV 40, a0RT : QUTPUT 
007466 017700 171634 MOV SRADAL RO : INPUT 
72 NOP 
74 NOP 
007476 NOP 
007506 o00240 NOP 
007502 00s077 171616 CLR IGRSTAT :CLEAR STATUS 
097506 BR TST4O 33 
007510 104006 1S: ERROR 6 sERROR, DIGITAL INPUT INTERRUPTED 
007512 oo0002 RTI 
097514 104906 2s: ERROR 6 sERROR, DIGITAL OUTPUT INTERRUPTED 
007516 oocdd2 RTI 


ne eee - eee oe - - -~—-< 
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DZORGC.P11 40 MEST THAT THE INPU An INTR. usiNG HE MAINT. BIT 
55 ARSE EE 69 9 EEE EE EEE EE 
4 TEST THAT T CAN INTR ; MAINT. BIT 


i itug, SCOP JHB HHH HEHEHE HEHEHE HEE 


NOP 
;CLEAR STATUS 


CLR OGRSTAT | 
RV 1S OGRA cg ;LOAD RETURN VECTOR 


HOV GRIVEB,aGRIVe 'LOAD OUTPUT VECTOR 
Ne ee rat ;MAINT. INT C.- 
ERROR 4 | SERROR, INPUT FAILED TO INTERRUPT. 


;SUB-TEST, TEST THAT IF PSW IS LOWERED AGAIN NO INTERRUPT WILL OCCUR 
; IF INTERRUPT OCCURS "INT DONE C’ FAILED TO CLEAR INT C FLOP 


1S: , Hes JGRIVA ;LOAD_INPUT VECTOR 
CMP = s (SP J+, (SP 34 ;POP THE STACK #4 
~~ PSW ;LOWER PRIOR. 
TSTY1 3;<NEXT TEST> 
(SP)+, (SP)+ 


;POP THE STACK 
Psy ;UNEXPECTED INTERRUPT 





OR11-K LOGIC TEST MAINDEC-11-DZDRG-C MACY11 27(732) 21-SEP-76 13:09 PAGE 35 
DZORGC.P11 T4l] TEST THAT THE INPUT INTR. CLEARS INT. ENABLE VIA MAINT. BIT 


14 } iteer di) TEST THAT IME INPUT INTR. CLEARS INT’ ENABLE VIA 
14 :&TE ST THAT THE INPUT INTR. CLEARS INT. ENABLE VIA MAINT. BIT 
14e9 ceeaveeneesyeeeusteanseaseeenteenteeennieaieenneensbeeaeeeste4as 
14 907626 +éTu1: SCOPE 

he Bees 

14 7634 71464 R IGRSTAT s CLEAR astarus 

14 40 01 10 171472 NV #15, JGRIVA tL TURN VECTOR 

1435 46 012777 40 171466 MOV #340, IGRIVSA : 

14 13777 00134 171462 MOV GRIVSB, IGRIVE "LOAD OUTPUT VECTOR 

th whe 1507s rater St HOY a0, SORIVSE ' LOAD INPUT NTR. ENABLE 
1439 oar RE8555 una 171420 BIS ab} te. saRerat : MAINT. 

14 007708 104004 ERROR 4 sERROR, INPUT FAILED TO INTERRUPT 
1443 007710 012777 007752 171422 1S: MOV #2$, IGRIVA sLOAD INPUT VECTOR 

1444 007716 Oeeb26 CMP (SP5+, (SP)+ :POP THE STACK *4 

1445 CLR. ss PSW "LOWER PR 

1446 ee 1124 CLR $GDDAT *CLEAR EXPECTED 

1447 007730 7730 171370 001126 MOV IGRSTAT . $BDDAT *READ STATUS 

1448 007736 nee 100 001126 BIT _ #BIT6, SSDDAT “TEST BIT & 

1449- 007744 O01406 BEQ TST4e2 ;;BR IF CLEARED 

1450 104001 ERROR 1 é -INPUT INTR. FAILED TO CLEAR 
wel oOo 000404 BR TsT42 ;;<NEXT TEST> 

1453 007752 022626 2s: CMP (SP)+, (SP)+ :POP THE STACK 

1454 007754 194006 ERROR 6 ?UNEXPECTED INTERRUPT 

1455 907756 605037 177776 CLR PSW 


DR11-K LOGIC TEST MAI aa ea a7 rae) uftn P=76 PAGE 36 


DZDRGC.P11 T42 AN IN THE MA at O85rT 
Rd H itest do TEST THAT THE OUTPUT CAN INTR’ USING THE MAINT B 
145 : TEST 42 TEST THAT THE OUTPUT CAN INTR. USING THE MAINT. BIT 
1458 oe A AR 
Ieo Gives Gonexg nes 
ter 171332 CLR IGRSTAT ;CLEAR STATUS 
1b 13777 342 171340 MOV GRIVSE aGRIVA ‘LOAD INPUT VECTOR 
1 1 1 171 MOV #0, acRt 
1464 O1 15005 10034 171 MOV #1$, JGRIVE ane OUTPUT VECTOR 
1465 910014 12777 990340 171324 MOV #340 JGRIVSB 
1466 10022 171274 BIS 1T13, IGRSTAT ;MAINT. INTERRUPT 
1467 019030 900240 NOP 
1468 010032 104005 ERROR 5S ;OQUTPUT FAILED TO INTERRUPT 
1470 ;SUB-TEST, TEST THAT IF PSW_IS LOWERED AGAIN, NO INTERRUPT WILL OCCUR 
1371 ; IF IT DOES, "INT DONE D HIGH’ FAILED TO CLEAR "INT D’ FLOP 
1473 010034 012777 O100S6 171302 1S: MOV #23, IGRIVB ;LOAD OUTPUT VECTOR 
1474 O10042 O22626 CMP (SP3+, (SP)+ :POP THE STACK #4 
1475 b10044 005037 177776 CLR PSwW 
1476 010050 000240 
1477 O100S= O00°040 NOP 
1478 010054 OO0404 BR TST43 33<NEXT TEST) 

1479 010056 O22626 2S: CMP (SP)+, (SP)+ -POP THE STACK 

-1480 O19060 104006 ERROR 6 *UNEXPECTED INTERRUPT 

By 010062 .00S037 177776 CLR PSW 
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DZORGC.P11 T43 TEST FOR INTR. FROM DRA INPUT 


1483 ¢ RREAAARAALAAARA LARA AAA LAL ALAA A ELE RRALA AAA A AAS RAE LARA RE EASE EES 


1484 ; ST 43 TEST FOR INTR. FROM DRA INPU 

4 yo hilt giana tae 
485 O10066 O00004 +éT43: SCOPE 

1487 010070 o00240 

1488 010972 O00240. NOP 

18 i fe o02000 171036 iT #91710, ASUR TEST SWITCH 

y 

1491 0101 BR iT $3 

1492 ot 106 0905077 171212 1S: CLR 

1493 10118 ble??? 010202 171220 MOV tes, SGvA ;IN CASE OF INTERRUPT 
1494 0101 12777 000340 171214 MOV 

1495 010126 013777 001346 171210 HOV geivears JGRIVB 

14 bibi%G ieee aati 171156 V a8 oett sei Teesgonsta ;ENABLE INPUT INTR. 
1998 10146 012777 90000 171154 HOV sQUTPUT 

iea6 Bioled poaso NOP Seba SET INTERRUPT OCCUR 
ie Sibley Gong ee 

1503 SIOTEE 04 000100 171130 BIC #BIT6, IGRSTAT 

1504 010174 O00240 NOP 

1505 010176 104004 ERROR 4 ;ERROR, INPUT FAILED TO INTERRUPT 
1508 010200 000417 BR TST44 $3 

1 010202 O2e626 2s: CMP (SP)+, (SP)+ 

1508 010204 005037 177776 CLR PSW 

1509 010210 77 171110 CLR IGRSTAT sCLEAR STATUS 

1510 010214 013777 O01342 171116 MOV GRIVSA, JGRIVA RESET INPUT VECTOR 
1511 010222 77 171114 CLR 

1512 010226 013777 001346 171110 MOV GRIVSB, IGRIVS RESET OUTPUT VECTOR 
1513 010234 77 171106 L aGRIVSB 


ee ee SS 


DapRGE.PIL “fay "PEST tant INTERRUPT INPUT BITS SET iret 


; j feggeunennnnnegnagaqaqesneacscqnerscuensereeceeeusnsmerensees 
;&TE EST THAT INTERRUPT INPUT BITS SET INPUT READY FLAG 


bobs 
uw 
bo 
uw 


1517 1 . jeeeeateeayeenereanceeneessssesasnenseeonstensteaseeaneeese4ss 
1218 seat Bg9983 002000 170670 aif #81T10, ISWR TEST CABLE SWITCH 
$20 010250 001067 BNE TST4S : ;BYPASS IF NO I/0 CABLE 
1 1922 012737 010266 001110 MOV #1$, SLPERR ;LOAD ERROR SCOPE RETURN 
1523 01 12737 000001 601356 MOV #81T0. BRLEV3 *LOAD_INT RRUPT BIT 
ise 10ebe 7 001126 "1S: CLR se00at CLEAR DAT 
1525 102 12737 B00258 001124 MOV #8117, SGDDAT ‘TOAD GOOD DATA 
19390 939737 001356 001336: T BRLEV3, INTBIT ST IF His BIT WILL INTERRUPT 
1838 C103e ie 171014 Bed JGRDIO vulteng es 1 air REGISTER 
1530 ptosis 12777 157999 171004 MOV #-1, JGRDAI ‘Cte OR CHPUT 
1531 010322 1 CLR IGRSTAT :CLEAR STATUS 
1538 010326 53777 001356 170774 BIS BRLEV3, JGROIO LOAD OU 
Tosa Oioaae Osi777 poise LP0PE6 Bis ane SeRDIO LOA OTPUT. 
1535 pt ose8 Bpea 170750 CLR GRST vat® FROM DATA READY 
1536 SHOULD REN N SET VIA DIRECT SET SIDE 
1537 INPUT SWITCH IS ON 
1538 010354 105777 170744 TSTB  aGRSTAT “TEST READY BIT 
1539 01 190401 Bh 2 :;BR IF tr 
1540 01 10401 oR i NPUT INTERRUPT BIT FAILED TO SET INPUT READY 
1541 :?? DID OPERATOR GIVE CORRECT 
ise *INPUT INTERRUPT BITS ?? 
ii 010364 043777 001356 170736 2S: BIC BRLEV3, aGR 9GRDIO sCLEAR OUTPUT 
1545 010372 053777 001356 170726 BIS BRLEV3, a ;CLEAR INPUT 
1546 010400 005037 001124 CLR :CLEAR EXPECTED 
1547 Di0404 005077 170714 CLR seRST FAT :CLEAR STATUS 
1548 O10410 117737 170710 001126 MOVB § aGRSTAT, SBDDAT *READ STATUS 
1549 010416 100001 BPL 3$ :;BR IF GLEARED 
1550 010420 104001 ERROR 1 INPUT READY FAILED TO CLEAR 
1552 010422 006337 001356 33: ASL = BRLEV3 sCHANGE GIT 
1553 010426 001317 BNE 1$ :BR IF NOT DONE 


3 
a 82 
= 
“e 


uy 
un 


b+ b— fh b= be BB se 
— > 


a Ha 


O00 BOO000000 2000 O00 


rod Ps bs ba pe pe pas Ba ps pice i od 


Bao sano aeine 


b+ b= & = bb b— 0 b= bP bb - bP  - b 0— p e 
i; 


Biais 


NO3. 


IC TEST MAI l 
Fg eee eer THAT NONCINTERRUPT: INPUT BITS BO NOP SEF SHUT GEABY FLAG 
© LEKKAAKAKEAAARLALA KA FRSLEAE RA RAL AES RA AAAAAE RAE SSSFERRAASLELSS ERAS 
TEST 4S TEST THAT NON-INTERRUPT INPUT BITS DO NOT SET INPUT READY FLAG 
FFL i+ iii 
me Baers 002000 170500 #81T10, aSWR sTEST CABLE SWITCH 
1050 TST46 ;;BYPASS IF NO 1/0 CABLE 
oe 012737 10456 001110 MOV #1$, SLPERR sLOAD ERROR SCOPE RETURN 
01 ha 001356 MOV #81T0, BRLEV3 ‘TOAD NON-INTERRUPT BIT 
O456 912737 001126 1S: MOV #200, $2DDAT ‘LOAD BAD DATA | 
0464 005037 O01124 CLR $GDDAT : CLEAR DATA 
0470 033737 001356 001336 BIT BRLEV3, INTBIT jest. IF atts 1S B11 WILL INTERRUPT 
0476 001026 BNE 3$ ;;YES SKIP 
0500 005077 170624 mash CLR oGROIO : SLE OUTPUT. REGISTER 
able piers 170606 CLR soaetare CLEAR AR etn US 
16 053777 001356 170604 BIS BRLEV3, JGRDIO :LOAD OUTPUT 
0524 o4 001356 BIC V3, IGRDIO sCLEAR SUT QUTPUT 
0532 3355 001356 170570 BIS BRLEV3, JGRDIO 
0540 005077 170560 CLR aGRSTAT ;CLEAR FLAG FROM DATA READY 
; SHOULD REMAIN pe VIA DIRECT SET SIDE 
os44 105777 170554 TSTB  aGRSTAT “TEST READY BIT 
0550 100901 BPL § ;;BR IF CLEAR 
9552 104011 ERROR 11 ; INPUT NON-INTERRUPT BIT SET INPUT READY 
9? DID OPERATOR GIVE CORRECT 
*INPUT INTERRUPT BITS ? 
0554 006337 001356 3S: ASL BRLEV3 sCHANGE BIT 
S60 001336 BNE 1$ ~ BR IF NOT DONE 





8 
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OUTPUT 


n 


pee erg PUNE ER ON tRS eRon 


a 


$y RRRRARASRRAREAERSLSSHASSSA SAAR AERA RASA AA LLL ALSLAFRALSRSS SESS SES 


TEST FOR INTR. FROM DRA OUTPUT 


s RRSRAFRAHESLASASLARASSAASAASSLASLSAELASLSSFSAALASLSLSASS FSS SLSASSS 


Bea 


0 -0--0 <p +9 


Sree Saat Ana aA a 


téT46: SCOPE 
NOP 


0-0 ~~ &- »-<- 8 ~ 9 -<p-< 


altaltaltal 


HOLS 





BRU RRE ORC Bae RRS 


001342 


3 
is 


e 


id 


MOMOOOOrrrmm 
> + 0-2 bs 0 bb 0-0 bho hae 
a 


WO NWU1£ Wutue-O 


NOP 

I #81710, 2SHR sTEST SWITCH 

teruz 33 

CLR aGRSTAT 
MOV #2$, IGRIVE sIN CASE OF INTERRUPT 
MOV #340, IGRIVSB | 
MOV GRIVSA, IGRIVA 
CLR aGRIVS 
MOV #81714, IGRSTAT s ENABLE OUTPUT INTR. 
MOV 80, aGROIO : OUTPU 
MOV JGROAI, RO : INPUT 
Wwe :LET INTERRUPT OCCUR 
Bie #BIT14, IGRSTAT 
ERROR a? ;ERROR, OUTPUT FAILED TO INTERRUPT 
CMP (SP)+, (SP)+ . 
MOV ger ysA Scaiva ;RESET INPUT VECTOR 
CLR aGRIVSA 
MOV GRIVSE aGRIVE :RESET OUTPUT VECTOR 
CLR 1vSB . 
LR PSW 
CLR QGRSTAT ;CLEAR STATUS 


fy RARSERALKASLELSELSLELELA SLA LSFSLALSLLAALESLAF SERS SRALSAALSLELETA 
: TEST 47 PRE-INTERRUPT SET 
s SREFESELELAAASLALAAALARERELARARALSSARELARALSLAAS ARRAS cAELALASSRED - 


S747: SCOPE 
ne 


ee 


a 


Naneulases 


Re itt 
Re 


ONNOOOVOOVOOMOOOMO 
02 = b= 8 8 0 2 


Ww 
~~ 


fe 


> +> b= &—- & <6 0-+6-< & + b+ 2 b <8 bb = 2 b= &-+ b+ 6-* F< = © oh § 0 8-0 + & 2 oo 2 — 2h -< §-< & + Oo 9-2 
oourg: 
(w 


Ww 





Vv 81,STIMES 3300 1 ITERATION 
RESET 
ae 0177S .OICEN, 
ERROR ? ;BR LEVEL INDICATED FOR OIGITAL 1/0 WAS 0 
MP a7 s,SI0. 


BNE 
ERROR ;BR LEVEL INDICATED FOR DIGITAL I/O WAS 7 


MOV OIOBRL, BRLEV1 
SUS 


EVI 
DIOBRL, BRL 
OIOBRL’ BRLEV 
#40,BRLEV3 
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5p RRRRREREREREREEREREEE SEEGER EEE EEE EE EEE LEER EAD EES EE EEEEE SESE EE 
;#TEST SO TEST FOR INTR. FROM DRA INPUT ON LEVEL INDICATED -1 VIA MAINT. INT 
5 RRREEEEREER EERE ESSE EERE REE E EE EEE EEE EEE EEE EEE EEE EEE ES EE EEEES 


tétso: 
IGRSTAT ;CLEAR ENABLES 
HOV #1$, IGRIVA SET UP VECTORS 
BRLEV1. PSW 
8BITS, MGRSTAT t SENERATE INPUT MAINT. INTERRUPT 


y sERROR, NO INTERRUPT FROM DIGITAL 1/0 INPUT 
rae Si, achlV Iva sRESET INPUT VECTOR 
MOV ae Rete ;RESET OUTPUT VECTOR 
CLR 
ps, Ss, IRE EE ts. Rn Aa ioe 
i eTEST Sl TEST FOR NO INTR. FROM DRA INPUT ON LEVEL INDICATED VIA MAINT. INT 
+ SRASLAFHRELERASLRALEAASESRAASLAASASSSSAELERKFASRSAAESRAALSEASSSS 


+8151 SCOPE 
CLR IGRSTAT ;CLEAR ENABLES 
MOV a1S, aghivA :SET UP VECTORS 


MOV Bri Eve :¢ PSW 
BIS #8ITs, SeReTAT :GENERATE INPUT MAINT. INTERRUPT 


Bo 


i = 6 + & = 6 -b-> & - pop 


0 + 0-20 6+ b= b> 9+ b— b + & = 9 b= 9 & 9 -- 6-0 --b = b+ & + 9 op 


NOP 
;SUB-TEST, NOW LOWER THE PSW AND ALLOW THE INTERRUPT 
82$, dGRIVA Hyer + ag 


3$ ERROR 
pie, te (Pre 
PSW 


6 ;UNEXPECTED INTERRUPT 


‘TSTS2 

(5P}+ (SPs :POP THE STACK | 

GRIVSA, OCR IVA RESET INBUT VECTOR 

GRIVSE JGRIVB sRESET OUTPUT VECTOR 


GRIVSB 
PSW 


geen eae 


Ce 
8 
~ 
wn 


Q 
Q 
| 
0 
Q 
1] 
0 
Q 
Gi 
v 
0 
0 
0 
0 
0 
6 
0 
4) 
9 
«) 


ESROBRERRERESLD SROSSROY 


0-20 +0 b-- 6 — 6-2 &— & + 6 2 - b 





2 


i 
ox 


% 


a AA 


>= b-+ & © 6 p< b-< p -- § ~ p< —- 9 
ow 


o 


wie 


row 
PRE 


sdgdencdnedans 
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‘iTEST G2 DETERMINE IF MORE DRII-K'S ARE 10 BE TESTED 
-K’ 


Cg oo pera apc onen ae rng Rammstein me 
tes: Whig 1 001166 tits soy #1, $TIMES :;00 1 ITERATI 
Bi iEc6 coer? rv erere) BYPASS: 5, Bey nett tect iy F ANY 
pt See 010000 167644 43 10 aSWR 88 IF att! OF SWR 
lig b01924 BYPAS] * INHIBIT TESTING NEXT DRL1-K 
11276 162737 000010 001316 #10, DRADD : UPDATE Dev CE ADDRESS 
11304 0627 99001 001320 ADD #10, DRIV UPDAT VECTOR 
11312 1314 DEC NBEXT !ANOTHER ONE ? 
O1i3k boo413 oR BYPAS] :BR IF ANOTHER 
11 013737 001306 001316 1$:. MOV BRSEBA, DRADD "RELOAD ADDRESS 
0113206 013737 001310 901320 MOV BASEIV; DRIV “RELOAD VECTOR 
011334 O13732 O013i2 001314 MOV NMBEXT } NBEXT :RELOAD NUMBER 
011342 137 011355 JMP SEOP ; 
011346 912700 177777 SYPAS1: MOV #-1,80 
0113S2 600137 503342 IMP ReEG2 ;TEST ANOTHER UNIT 
.SBTTL END OF PASS ROUTINE 
+ SEFRLSRSESLERSRESSSAAASKSLALESASSASESASARHSASLESELASLRRASSLAESE 
tLINCREMENT THE PASS NUMBER (SPASS) 
:#INDICATE END-OF-PROGRAM AFTER 1 PASSES THRU THE PROGRAM 
; *TYPE “END PASS BXXXXX" (WHERE XXXXX IS A DECIMAL NUMBER) 
:#IF THERES A MONITOR GO TO IT 
:#1F THERE ISN’T JUMP TO BYPAS! 
011356 SEOP: 
011356 ooo004 SCOPE 
011360 005037 001102 CLR TSTNM $3 ZERO Q THE TEST TEST 
011364 - 001166 €LR TIMES ITERATIONS 
O11 905237 901109 INC SPASS TRCRENENT NEP ASS NUMEER 
011374 042737 100000 001100 BIC #100000, SPASS : DON" T ALLOW A NEG. NUMBER 
011402 005387 DEC (PC)+ >: LOOP? , 
011404 l SEOPCT: .W 
011408 003022 BGT SDOAGN > YES | 
011410 012737 MOV (PC)+,a(PC)+ ;;RESTORE COUNTER 
511412 909001 SENDCT: . 1 
011414 011404 SEOPCT - 
011416 104401 011463 TYPE SENOMG :; TYPE “END PASS # 
O1l422 013746 0011 MOV $PASS, -(SP) :SAVE SPASS FOR FYPEOUT 
011426 104405 TYPOS ::G0 TYPE--DECIMAL asciT WITH SIGN 
011430 104401 011460 TY SENULL ;}TYPE A CHARACTER 
011434 013700 SGET42: MOV die RO *GET MONITOR ADDRESS 
011440 001405 Q DOAGN : BRANCH IF NO MONITOR 
011442 000005 SET CLEAR THE WORLD 
O14 004710 SENDAD: JSR PC, (RO) ::G0 TO MONITOR 
11446 000240 NOP SAVE ROOM 
011450 O00240 NOP ? 3 
011452 900240 NOP :ACTLI 
b11454 SDOAGN: 
11454 000137 IMP a(PC)+ ; ; RETURN 
011456 011346 SRTNAD: .WORD BYPASL 
011460 377 377 000 $ENULL: .BYTE -1,-1,0 ;;NULL CHARACTER STRING 
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O15 O42412 O42116 SENDMG: .ASCIZ <15><12>/END PASS #/ 
os 051501 O20le3 ' 


-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
j | SHH HEE HEHE HEHEHEHEEEEEEHEHEHHEHHEHHHEHHHEEEEE HEE Hite 


ate h Wend REDS NGREE Ro! rbd PENBEbeNBIRE on uci Hag foe 
ee The FiRot Brit OF THe NIMGER. LEAD! MRS Mt TE 


#REPLACED WITH SPACES 
#CALL: 


;;PUT_THE BINARY NUMBER ON THE STACK 
;3G0 TO THE ROUTINE 


fe 
Dob 


Ree 


—-O000000 
-~Cr <- « 


pare 


020200 
000020 


AaAswnaw—o 
mal 
L md 


38 


ooooss 
tee 
40 


011704 SOTBL(RO),RL ONS TAN 
: SUB RL, RS a THIS BCD DIGIT 


Re # BCD DIGIT BY 1 
R1.RS ; ADD BACK THE CONSTANT 


S$ HROUGH IF 0 

(SP) tESTILL DOING LEADING 0°S? 
7$ IF YES 

(SP) Hit? 

6$ IF_NO 

s'0,F ~1(R3) ;;YES--SET THE SIGN 


ii MEME THE BCD Dich ascly 
3 3MAKE IT A £ READY A DIGIT 
Re, thas :PUT THIS CHARACTER IN THE OUTPUT BUFFER 


RO, #10 
2s" 


OREN 
= 
= 


se , 

~ 

3 
vee. . . 
m 
see 


a Ae AEA 


a 
™N 
8 


bb 2 od 2b + 6 >= & 2h 2 b+ 2 HH oH oH = 
uw 

—-O 

ow 

Oo 

R 


e 


INR EGO 
Stat atte 
Shea 


BES 
FRE 


ois 


RERBERS 


8$ 

i ;GET THE LSD 

6 $360 CHANGE TO_ASCIT 

(SP)+ 3; WAS THE LSD THE FIRST NON-ZERO? 


9$ 
177777 177776 MOVB -1(SP),-2(R3) t IYES--SET THE SIGN FOR TYPING 
9$: (R3) ;;SET THE TERMINATOR 


0 
Q 
Q 
0 
a) 
0 
0 
1] 
1) 
1] 
a) 
0 
0 
Q 
p 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


Cor 
REVS 
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1793 
ig 


383 


7? 


0 0 bh oh pe 


Sta tel tetetctetctee 


* 0 b= 0 be 
— OOO ous 


fo 


BRARTERRR SSSR ESEEee 





oO 
om 
oe 
o 
uw 
£ 


RERSNEE LER 
BRBLeseecesee 
Be eee S 


ONONIOVOONO000000 
O20 = bh ao me 


babe 
£Muo 


Padsenzaanay 


00 OOKOOVDOVOVOO000000 
3 
<£ 


+= b= & +6 = b= b-= b = b= 6 h-2 6 p29 bs + Fh Se 


8 








C 


ooo 


BR 


I 
T 


011714 
oo0cde 


012026 


7356 
024 
340 


7330 


—-OH- 
r~o 
“iru 


—-Or~- 
oro 
“itu 
wo 
—TY 
Muse 
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SOTBL: 10000 


SDBLK: .BLKW 
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4 


33 Y 
;;ADJUST THE STACK 
;;RETURN TO USER 


;;POP STACK INTO RS 


HE IRR 


NT 
K_INTO R 
THE R 


2 ama gg oS eeemcaammmaaiama iain 


:&TEST S3 


. EX 0 
Eiri rer rttt iri titi iirtttitiiititit iti tt tii iti ttt tte 


tSTS3: SCOPE 
eerste JSR 
$ MOV 


18: 
CLR 


EXTTMP: 
EXTCNT: QO 


ASL Tid EXTCNT 


aGRO 

GRDAI , EXTTMP 
Saat ; Pans 
@GROIO 
#52 0 


;SET UP yess AND VECTOR 
UN 


;LOAD CO 


CLEAR OUTPUT REGISTER 
*LOAD OUTPU 
?CLEA2 INPUT 
*CLEAR OUTPUT REGISTER 
*LOAD OUTPUT 


“CLEAR INPUT 
-sFINISHED COUNT 
- LOOP 
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Pll TS4 COULTER INTERFACE TES 
1829 $3 KRKARAARSRAAAARAAKRAAA RSA SRA LAERARAS HELA ALSSARRSRLELSRAARAASRERSS 
l :#TEST S4 COULTER INTERFACE TEST 
1 © KLRAKEREREASERELAARERRAA KALA AK SAAA RARER E SERA LEAS LS RES EAA KERALA ES 
1 12030 +STS4: SCOPE. 
1 1etse eI 00 COULTR: JSR pC SETAOD ;SETUP BUS ADDRESS AND VECTOR 
1834 Ol 16 CLR aGRSTAT CLEAR INPUT STATUR REG 
1835 O12042 012777 O12104 167270 . #20$, IGRIVA ‘LOAD INPUT VECTOR 
183% 1e0s6 012777 167264 > MOV #340, JGRIVSA 
1 l 1od401 1$: . TYPE 
1838 012060 012272 RUNMSG ' ;TELL OPERATOR TO “RUN SAMPLE” 
1839 O1e062 O1 O1S646 MOV #BUFFER, Rl *LOAD POINTER FOR RESULTS 
1840 Dede 167230 4S: MOV 8176, JGRSTAT *ENABLE INTERRUPT 
1841 Ol 37 eee CLR p *LOWER 
1842 012100 000001 WAIT :WAIT FOR OPERATOR 
1843 Olel02 000771 BR 4g 
1845 912104 Se2b2b 20$: CMP (SP)+. (SP)+ :POP_ STACK 
1846 Olel 1 009106 012270 MOV #70. , 100s *LOAD # OF 1 MSEC DELAYS 
1847 Olell4 Ole700 O00e4%0 =~ 6S: MOV #240; RO ‘LOAD 1 MSEC. DELAY WEIGHT 
1848 :240 FOR 11/0S TYPE 
1849 | ?620 FOR 11/40 TYPE 
1850 012126 005300 3S: DEC RO : DELAY 
1851 Olelee 001376 BNE 3$ 
185¢ Olele4 005337 012270 DEC 100$ sFINISHED ALL MSEC. DELAY ? 
1 012130 001371 BNE $ BR IF NOT 
1854 012132 017700 167170 MOV JGROAI, RO :SAVE RESULTS 
He GIES BOPP rere sereo =o Gta tia her 
ise? Btstue Bascom bar7> Be || a7PPO RD RG 
1858 O121S2 001345 _ BNE 4§ *BR IF NOT LAST SAMPLE 
1859 012154 012741 122456 MOV #123456, -(R1) “LOAD TERM. j 
1861 012160 012703 015646 MOV #BUFFER,R3 ;LOAD RESULT POINTER 
1862 012164 012300 cS: MOV (R3)+, RO :GET T 
1863 012166 022700 123456 CMP #123456, RO sTEST FOR TERM. 
1864 Ol2e172 001731 BEQ BR IF DO 
1865 Ol2174 004737 Ol2e02 JSR PC, 40S ‘CONVERT AND TYPE 
1866 012200 000771 BR S$ :CONT. ‘TYPING UNTIL DONE 
1868 
1869 SUBROUTINE FOR THE COULTER TEST 
1870 Ol2202 012737 OO000SS 012314 40$: MOV wSS.MSGRUS+2  =Sssi(‘(es~*é«S UX. MESSAGE 
1871 Ol2210 Ole702 012321 MOV SMSPNT1,R2 ‘LOAD DEST. POINTER © 
1872 Olecl4 012737 OO0004 012270 MOV #4. 100$ LOAD COUNT 
1873 Olece2 o00404 BR 12$ 
1875 012224 006000 10$: ROR RO 
1876 Olece6 O06000 ROR RO 
1877 Ole230 006000 ROR RO 
1878 Olee32 O06000 ROR RO 
i 012234 010001 123: MOV RO,R1 ;LOAD RI 
1880 012236 042701 177760 BIC #177760,R1 : MASK 
1881 Olec42 052701 Oo00060 BIS #60,R1 *MAKE DIGIT 
{665 Oisee0 adsa3? 012270 OE pers ‘PON isheo 
1884 Bisseq ae BNE 188 :BR iF NOT 


HO4 
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™ 
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;ADJUST MESSAGE 


SWAB MSGRUS+2 


012314 


sEXIT 


€15><12><12>/RUN SAMPLE/<15>< 12> 


-ASCIZ 


0 


100$: 
l2 047125 RUNNSG: 


«15> «12> /-NNNN/ 


0 


-ASCITI 


MSPNT1: . 


047055 047116 MSGRUS: 


BYTE 
- EVEN 





~~ 
& 
i 
> 
@ 
uJ 
a 
- 
— 
z 
- 
- 
tJ 
w 
oO 
-— 
Qa 
tJ 
—j 
- 
x 
ua 
— 
~ 
ao 
— 
— 
F 
ind 
- 
2 
tJ 
— 
z= 
| nd 
~“ 
™N 
nd 
oO 
w 
= 


-ASCIZ /STATUS REGISTER IN ERROR/ 
-ASCIZ /INPUT REGISTER IN ERROR/ 
-ASCIZ /OUTPUT REGISTER IN ERROR/ 
-ASCIZ /INPUT FAILED TO INTERRUPT/ 
-ASCIZ /OUTPUT FAILED TO INTERRUPT/ 
-ASCIZ /OPERATOR INTERVENTION ERROR/ 


-ASCIZ /UNEXPECTED INTERRUPT/ 


Rae 


Ss 6s eee R86 WSN RAN S228 AAAs 
BAIS Sino PAT SaoN oth as aa4 dans or eee 
wuss Boris Bees NTR Ger Bue Bahn grreuszs 
Ban ain Yona f882% erg 28 sugges 
“4 ted 
a 


ae 3g § vis Spares taataaet 
SoPRPEN Anan M Rass am sea RIS 
ree Sevan “raga taa = 


Sit NM RREReREAA REAR RCE 


coe emen ea heme Roane ioams Ream eam Teamn ioamme ean eae eae hare Pee ee eae eek tee ek ee ee ae te te ee ae ae fn ae ee te an eae Bk ae te hae ban ea 
QOOWQOOOWOWOWOWWOWWOWOBOWOKWKWWOOWWNHOOBOK0WKWOO000O00000000 


EERIE CER eebeelsvonvvIsvTssssssraTe INNO NNS TOON IONS 


8 Oh nd Od Oh 9 4 4 4 aaa atin ia 


eee eee 


EXPECTED/ 
STATUS EXPECT INPUT BIT/ 


STATUS EXPECTED/ 
OUTPUT EXPECTED/ 


INPUT 


DRADD 
DRADD 
pao 
DRADD/ 
DRADD 


$BDDAT , SGDDAT , BRLEV3,0 


/NON-INTERRUPT INPUT SIT SET INPUT READY FLAG/ 


ZERRPC 

ZERRPC 

ZERRPC 
DRADD 
DRADD 


. EVEN 
SERRPC , DRADD , SBDDAT, SGDDAT , 0 
0 


SERRPC 
SERRPC 


-ASCIZ /ERRPC 
ASCIZ /ERRPC 


ASCIZ 
-ASCIZ 
ASCIZ 
ASCIZ 


z - Ss es 
—I—t—4 Tr BS “4 —ikaoes 
ae z 


fea ee yee a 
5 NSSNRSNS 
BL fe eet gaa ae ae 
gismnpass weeomauce seq upeRaunsnuTE, 
S ooag oe Salas uRine ey “Ea hesece 


BeRNaNGS rogers BARGAIN 


pan pee pee ee, fee bee fue foe eee, Ma eae ee eae fan baw feos foe fas pan fas fan fan pan fan fas fan bon fon fon fas ban bos bas bon bon bos bon bon] 
20OO80009 BOOKKWWWOOOWKW9000092Q000000000000 


FEES SSS SSSR T EIEIO D RROD DOO wen eTaeeS 


OE OT LL SOLD OTD DELLE LLL LE, 


001126 OT1 
000000 OT4: 
0011e6 DT10: 


040522 
4360 DH10: 


NTERFACE 
O444ss EMI: 


nw 
zz 
wy 
cz 
a. 
g 
cs 
_ 
rvs) 
e 
a. 
ti 
J 
Tw 
a 
~ 
mw 
cu 
— 
Be 
Oo 
§ 
é) 
Sz 
a 
= 


TS4 COUL 


-Pll 
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OZDRGC.P11 TS4 COULTER INTERFACE TEST 


-SBTTL SCOPE HANDLER ROUTINE 


dt 


5p RRR RMHRE REE REEEER RE REEE REE EE EERE EEE LAER EE LAER EEE EE ERE EE LESSEE 
j ATH Ha A pe ie CONTROLS ld ar OF oe a a INCREMENT 
HE TEST ) INTO G. (DISPLAY<7:0>) 


BE RT etied Mende enRtie 


rote TRMTeIT TreRat TIONS 
LOOP 


euoget LOOP ON TEST IN SWR<7:0> 
j #CALL 
;# SCOPE ;; SCOPE=IOT 


SSCOPE: 
;;TEST FOR CHANGE _IN SOFT-SWR 
165676 1S: geek #81714, ISWR $s LOOP ON PRESENT TEST? 
OVE: YES IF SWI4=1 
-eeaexSTART OF CODE FOR THE XOR tESTERSeMES 
$xTSTR: BR 6$ ssf RUNNING ON THE “XOR™ TESTER CHANGE 
THIS INSTRUCTION TO A "NOP" (NOP=240) 
OSERRVEC, tt cave THE CONTENTS OF THE ERROR VECTOR 
#ERRVEC 339ET FOR TIMEOUT 
IME OUT ON XOR? 
, {RESTORE THE ERROR VECTOR 
BR G0. 10 THE NEXT T 
SS: + CLEAR THE STACK TESTER A TIME OUT 
j SRESTORE ERROR VECTOR 
BR THE PRESENT TEST 
&$:;#8888END OF CODE FOR THE nOR tesTeRsaags 
165630 BIT 481 TOS, aSWR OP ON SPEC. TEST? 


001102 — HON THE RIGHT TEST? SWR<7:0> 
RE OCCURRED? 


b= b= b—= b= b— 0 -= b= 6 p— pb = 6b ~ P— 
w 
WO 
cd 


BES RRE 


oo 
oe 
tat 
Ww 
<£ 


TT a | TE 


Bee paeBees 


2010 
2011 
ele 
2013 
2014 
2015 
2016 
2017 
2018 
2019 


is 


OOOO OOOOOOOOOCOOOOOOOOOOOOO0O0O000000 
ee ee te 


001103 
165572 
BE 4 : 
001106 7S: - ADDRESS TO LAST SCOPE 
BR OVER 
ERROR FLAG 
NUMBER OF ITERATIONS TO MAKE 
BR 15 + THE NEXT TEST 
165540 3S: aBIT11,0SHR TUTERATIONS? 
SPASS 
1$ 
SICNT + COUNT 
STIMES,SICNT NUMBER OF ITERATIONS MADE 
SOVER i RE ITERATION REQUIRED 
1S: #1, SICNT ti He ITERATION COUNTER 


MOV SMXCNT,STIMES 3:SE IONS TO D 
$SVLAD: INCB  $TSTNM ::COUNT TEST NUMBERS 
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DZORGC.P11 SCOPE HANDLER ROUTINE 


2042 o134N4 011637 001108 hoy (SP), SLPAOR $1 SAVE SCOPE LOOP mOORESS 
Ea OL Suey boss? atte CUR sis CE HeLebe aris, EScaPE OR ADDRESS 
[yu 019997 DOLIbe GESHHE SOVER: HOV” THN QOISPLAY i Test jah resenge ays 
as $ ’ 5 
Sit ae if lb wages MOV apie piaeyay Tes 
8 013500 900002 RTI $C DS fe 
e043 13502 003720 SMXCNT: 2000. NUMBER OF ITERATIONS 
e050 .SBTTL ERROR HANDLER ROUTINE 
3 © KELAKAREERA RA LEA RE KEL EAA KALLE ERA SASS LAA LAA SASSER HA ALAS RESRAEALEEE 
THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
y SXSAVE THE ERROR M NUMBER AND THE ADDRESS OF THE ERROR CALL 
2055 *#AND GO TO SERRTYP ON 
205 . 3 #THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
;#SWIS=1 HAL RO 
2058 HSuL3e4 INHIBIT ERROR TYPEOUTS 
5089 | j #SWOS=1 LOOP ON ERROR 
e0e1 te ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
2063 013504 SERROR: 
2064 013504 104407 ~ CKSWR ;;TEST_FOR ston Fe SOFT-SWR 
2065 013506 105237 001103 7S: INCB  SERFLG ::SET THE ERR 
2066 013512 001775 BEG 7§ DON’T LET THE FLAG GO TO ZERO 
_ 2067 013514 013777 001102 165420 MOV STSTNM, DISPLAY s DISPLAY TEST NUMBER AND ERROR FLAG 
sei tee Grieg Bull my (eitemeee [1227 aGnESS Eton struction 
Sua Oi sese 133 001116 SUB SERR " 
2071 O13540 117737 165352 001114 MOVE  aSERRPC, SITEMB 3 ;STRIP AND SAVE THE ERROR ITEM CODE 
e07e 013546 032777 O20000 165364 BIT #81713, aSWR :SKIP TYPEOUT IF SET 
13554 001004 BNE : SKIP T 
2074 013556 O04 013642 ISR PC. SERRTYP ::G0 TO USER ERROR ROUTINE 
e075 013562 104401 001173 TYPE PStRLE 
013566 , 20S: 
e077 013568 005777 165346 2s: TST aSWR ;;HALT ON ERROR 
13572 1 BPL 33 33SKIP IF CONTINUE 
2079 013574 oo0000 | HALT ON ERR OR! 
2080 135 . CK :: TEST FOR C IN SOFT-SWR 
2081 t3EOp | 001000 165332 38: BI #B1T09, ISWR *:LOOP ON ERROR SWITCH SET? 
2082 013606 O0140e2 BEQ § top IF NO 
013610 13716 001110 MOV SLPERR, (SP) FUDGE RETURN FOR LOOPING 
013614 737 001170 4S; TST SESCAPE i; 3 }CHECK FOR AN ESCAPE ADDRESS 
2085 013620 001402 BEQ cs *BR IF NONE 
2086 Ol sbee 013716 001170 ~- “a MOV SESCAPE, (SP)  TEUDGE RETURN ADDRESS FOR ESCAPE 
opB8 ee 2737 011444 ooDd4e CMP #SENDAD, 3842 ;;ACT-11 AUTO-ACCEPT? 
2089 013634 001001 BNE 6$ ::BRANCH IF NO 
2090 013636 00 HALT ?: YES 
2091 013640 6S: 
2092 013640 ooD002 ; ;RETURN 


ee ee oo — 
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2081 .SBTTL ERROR MESSAGE TYPEOUT ROUTINE 

: jHUEHReeeenenensesaeeeatatnsenseecsereeneeneneeteeserneey 
soe? ATH ROUTINE USES THE “ITEM CONTROL BYTE” (SITEMB) TO DETERMINE WHICH 

SERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TABLE” (SERRTB), 
2039 AND REPORTS THE APPROPRIATE INFORMATION N EONCERNINE THE ERROR. 
sit nets 04401 001173 omemeisty CRL “CARRIAGE RETURN” & “LINE FEED” 
513 wea yeaa MOV Ao ts -(SP) He ae 
104 013650 905000 CLR RO’ ::PICKUP THE ITEM INDEX . 
2105 013652 153700 001114 BISB ad#SITEMB,RO - 
Sig? 013656 001004 ; BNE 1$ sil Fad Me NUMBER ER S S ZERO, JUST 
¢108 013660 013746 001116 MOV SERRPC,-(SP) eave See C SEOR TYPEOUT 
2110 013664 104402 TYPOC $60 BP YPE OCTAL ASCII(ALL DIGITS) 
iit Bie 5B 1S BE Bo ADJUST THE INDEX SO THAT IT WILL 
ct iey Be en 
2115 013676 006300 ASL RO 
glib 013700 001176 ADD #SERRTB, RO ; FORM TABLE POINT ER 
117 Ol ie % 13714 MOV (RO)+, 2% ::PICKUP ” MESSAGE” POINTER 
2118 013710 001404 BEQ 3$ ::SKIP TYPEOUT IF NO POINTER 
ei13 13712 14401 TYPE ssTYPE I THE “ERROR MESSAGE™ 
i i 14 09 2s: ;HORD oe MESSAGE” POINTER GOES HERE 
aE: Oi Olz037 504423 3S: nov tR0)+, 48 eA HEADER BOT RTER 
Gs: 4 TYP. 2: TY t ATA R" 

5isd 6132.39 ABadbd 4g: TYORD 0 RGN bot “HEADER GOES HERE 
sig? Herat atti msi SS: nov" 10), Ao te ATA Tee FA TABLES POINTER 
I 139 Bat , BNE 75 : 
2129 013744 012600 6S: MOV (SP)+, RO ORE RO 
g130 O1g7ae 104401 001173 Type acRLF HP caam ace RETURN” & “LINE FEED” 
2132 013754 73: - 
1 13754 0 MOV Q(RO)+,-(SP) (RO)+ FOR TYPEOUT 
5t34 Bt asee TaadaS TYPOC 1160 Tercera asc (ALL DIGITS) 
e136 013760 005710 TST (RO) $3 1S THERE ANO R NUMBER? 
5135 Bt aoEG eA ot 013772 aa & i ROE Tho) SPACES 
2138 013770 000771 BR 3g * : LOOP 
2139 013772 O20040 000 8S: -ASCIZ /  Twoce) SPACES 
2140 013776 "EVEN 


2 
* 
“3 


ee 


RR SSB RR EO wes otal 2 csr eo WUT CoO Co0o OT Eero oun ae ie 


OOOO OOOOOO OOOO OOOOOOOOO0000000 
ee ae ee ee eh et ee eh ee 
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RROR MESEAGE TYPEOUT ROUTINE 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


Belebbuladabelehhtebdabatadatehbedadat ttob- teh debatataddeldedated-tlabatehebatetelalelelohatehetebadatabatehebebaded 
THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 


;#OCTAL (ASCII) NUMBER AND TYPE IT 

EBT POs---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
3% MOV NUM, -(SP) ;;NUMBER TO TYPED 

; TYPOS 3;CALL FOR TYPEOUT 

7% -BYTE N - 3 3N=1 TO & FOR NUMBER OF DIGITS TO TYPE 

;# -BYTE MM ;;M=1 OR O 

;* ;;1=TYPE LEADING ZEROS 

- ;;Q0=SUPPRESS LEADING ZEROS 


:¥STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
j#STYPOS OR STYPOC 


1% MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

ii TYPON *:CALL FOR TYPEOUT 

j #STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 

+ MOV NUM, -(SP) ;s;NUMBER TO BE TYPED 

3% TYPOC ;;CALL FOR TYPEOUT 
3776 017646 STYPOS:. MOV a(SP),-(SP) ;;PICKUP THE MODE 
4O02 116637 O00001 014221 - MOVB I1(SP);SOFILL $;LOAD ZERO FILL SWITCH 
4010 112637 014223 MOVB § (SP)+.SOMODE+1 ;;NUMBER OF DIGITS TO TYPE 
4O14 Obe7 1 oo0002 BOD , te, (SP) *: ADJUST RETURN ADDRESS 
Mine so 112737 1 014221 STYPOC: MOVB #1,SOFILL ;;SET THE ZERO FILL SWITCH 
4030 112737 000006 014223 MOVE #6, SOMODE+1 ::SET FOR SIX(6) DIGITS 
4036 116737 000005 O14220 STYPON: MOVB #5, SOCNT SET THE ITERATION COUNT 
4O44 Ql MOV R3,-(SP) ;;SAVE R3 
4046 010446 MOV RY; -(SP) SAVE RY 
4OSO 010546 RS. - SAVE RS 
une 113704 014223 MOVB SOMODE+1, RY GET THE NUMBER OF DIGITS TO TYPE 
4OEB 062704 oo0006 ADD #6, R4 ;;SUBTRACT IT FOR MAX. ALLOWED 
4064 110437 O14222 MOVB = R4' SOMODE - 3:SAVE IT FOR USE 
4070 113704 O14221 MOVB  S$OFILL,RY *:GET THE ZERO FILL SWITCH 
4074 016605 I MOV 12(SP),R5 PICKUP THE INPUT NUMBER 
4100 005003 CLR *:CLEAR THE OUTPUT WORD 
4102 006105 18: ROL RS >:ROTATE MSB INTO “C™ 
4104 o00404 BR 3$ GO DO MSB 
4106 006105 2S: ROL RS FORM THIS DIGIT 
4110 006105 ROL RS 
4112 006105 ROL RS 
4114 010503 MOV RS,R3 
4116 006103 3S: ROL R3 ;;GET LSB OF THIS DIGIT 
4120 105337 ol4e22e2 DECB S$OMODE :: TYPE THIS DIGIT? 
4124 100016 BPL 75 ::BR IF NO 
ties 042703 177770 BIC #177770, R3 ::GET RID OF JUNK 
4i3e Oo1002 BNE 4g :: TEST FOR O 
4134 005704 TST RY ::SUPPRESS THIS 0? 


04 
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DZORGC.P11 BINARY TO OCTAL (ASCII) AND : 


2197 014136 001403 BEQ S$ 33BR IF YES 
$18 RSIS BEB mes ER Blogs RE AE O's 
He Gee pee se bP se pt Alo 


sane 104401 Biasoe 7: Nie 3 7 4 YPE THIS DIGIT 
CS a eee be 


SESSA 


014176 912605 $$: MOV (SP)+,RS : RESTORE 

14 12604 MOV —«-(5P) +7 RY ;3REST 

14 12603 MOV  (SP)+;R3 tSREST 
2211 O14204 O16666 00002 OO00004 MOV  2(SP)i4(SP) SET THE STACK FOR RETURNING 
ele Ol4el2 O12616 MOV —« (SP) +5 (SP) 
e613 Ol4e14 000002 RTI . ; RETURN 
2214 O14el 000 8s BYTE 0 HSTORaGE FOR ASCII DIGIT 
2215 O14el 000 ‘BYTE 0 | RMINATOR FOR TYPE ROUTINE 
ee16 014220 © 000 SOCNT: ‘BYTE 0 :I0CTAL DIGIT COUNTER 
2217 Ol422i O00 SOFILL: :8YTE 0 :iZERO FILL SWIT 
2218 Ol4222 O00000. ODE: 0 :{NUMBER OF BIGITS TO TYPE 
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DZORGC.P 11 AND TY 


P BINARY TO OCTAL (ASCII) 


$s SRERSRASSLELLASEAELESALL SS SALHLASSLALASA SSSA SAS SRLS SALLE S LSLLES 
: OuER DOWN ROUTINE 
SPWRON: MOV SSILLUP, J8PWRVEC ;;SET FOR FAST UP 
8340 DAPWRVEC+2 3: PRIO:7 
-(SP) *:PUSH RO ON STACK 


2 
es .SBTTL POWER DOWN AND UP ROUTINES 


ees 
é 
e229 


5531 
ee 


2 
# 
341 
8) 
5g 


0 — 0 0 0 0 0+ 0 
qaaeeeee 


z 


ss nan a cin cee ie eee 


“POWER UP ROU 

SPWRUP: MOV SSILLUP,QSPWRVEC ;:SET Som FAST DOWN 
MOV SSAVRE, SP ::GET SP 

SSAVRE :SHATT LOOP FOR THE TTY 

$ :;WAIT FOR THE INC 


top ne INTO aSWR 
;;POP 
:- POP 


a 


1$: 


8 
ee 


» SE 
WRVEC+e 3;PRIO:7 

?:REPORT THE POWER FAILURE 
WRMSG _ ::POWER FAIL MESSAGE POINTER 
(PC)+. (SP) 3 Re TART AT IOTEST . 
roTest ::RESTART ADDRESS . 


Statetatatatatstey 
qaeennen 


£ 
Oo 
- 


SS 


;; THE POWER UP SEQUENCE WAS STARTED 
| 33; BEFORE THE POWER DOWN WAS COMPLETE 


: -:PUT THE SP HERE 
: ,ASCIZ <15><«12>/RESTARTING AFTER A POWER FAILURE’<15><12> 


se 


R 
Or 


= ioe 
fauetis 
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DzDRGC. PII POWER DOWN AND UP ROUTINES 
\SBTTL TYPE ROUTINE 
iatteeeteseonceeeseegsocecenesensereeeveneensneneseneeeesnenens 
MESSAGE MUST TERMINATE 


i dRou O TYPE RSCIZ MESSE TH A O SYTE. 
ne Routine WILL INSERT 8 enorme lens OFT RA LINE FEED. 
ea THE FILLER CHARACTER. 


po a 2 lay alg ke mat 


SSCALL: 
a1) USING, S . a ; 
;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


TYPE 


A TERMINAL? 
IF NO TERMINAL 
ADDRESS OF ASCIZ STRING 
TER TO BE TYPED ONTO STACK . 
F ’T THE TERMINAT 
ERMINATOR POP IT OFF THE STACK 7 
(SP)+,RO $ 
82, (SP). tt ° 
BHT, (SP) 
BCRLF (SP) :;BRANCH IF NOT <CRLF> 


(SP)+ ;POP_ <CR><LF> EQUIV 
t TYPE A CR AND LF 


SCHARCNT ee cEeAn PAW COUNT 
T_NEXT_ CHARACTER 
S_ CHARACTER 
FOR F Sathea CHARS. ’ 


Pen sabeenonas 


ows 


0 
or cO 


PC, STYPES 
SFILLC, (SP)+ 
$NULL , -(SP) 

NULL CHAR. 


He ¢ 
1(SP) 38: NULL NEED TO BE TYPED? 
6$ 33 NO=-GO POP THE NULL OFF OF STACK 
PC, STYPEC ¢ 


E A NULL 
ee OUNT AS A COUNT 


;HORIZONTAL TAB PROCESSOR 


gonna O40 eS: MOVB ys (SP) : RELA ACE 7a WITH SPACE 
et: JSR c, $TYPEC ACE 

bhg8a7 014660 BITB ay SCHARCNT FERENCH, iF NOT AT 

BNE 93° :TAB STO 


+s 


HOY PERRO 


ot 
1 
Ol 
Ql 
01 
.Q1 
01 
Bt 
“Ol 
. Gl 
QO} 
QO} 
Ql 
01 
Bt 
1 
Q1 
aH 
1 
Oi 
01 
01 
0} 
Ol 
01 
01 
-Q1 
01 
at 
1 


in 
ts 


Bes 
won) 
i 
& 
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DZORGC.Pil TTY INPUT ROUTINE 


-SBTTL TIY INPUT ROUTINE 
1 MNT Repent egunnanr menue nian on peonnenmnpnregenmtte a 
L 


: 
" ENABL 
; LHAAAAALLLALALAAALALALALAAASLLSSRASERAARRLLERALE LLL LEAL ESS SERS S 


ES OUTINE the Te EN ERED FROM THe Se tee Rap HANOLER AND WILL 
oa vai HANGIN SOF TWARE RauticH REGISTER TRAP CALL 


IN In tirefre 
000176 001140 3315 THE E SOFT-SHR SELECTED? 
164244 Ios 
BPL 1S$ 
a$STKB,-(SP) 
8tC17?, (SP) 


#7, (SPJ+ 
s$ 


eg 
I3 


? 
s. 


ue 


ee RUNNING Th IN RauTO-nODE? 
ow THE CONTROL-G (1G) 
a GREE Fok TyPEOuT 
::G0 TYPE--OCTAL ASCII(ALL DIGITS? 
FOR NEW SWR 


SS 
—Uye 


2 
= 


1 


se 
fons 


;CHAR THE 
a NOT TRY "AGAIN 


aSTKB, - (SP) :;PICK UP CHAR 
#tC17?, (SP) ::MAKE IT 7-BIT ASCII 


15 


(SP), #25 3315 IT A CONTROL =U? 


H IF 
EYES ECHO RONTROL -U (tu) 
IGNORE PRE PREVIOUS INPUT 

PtiET’S TRY IT AGAIN 


58R 
2am 


3515 IT A_<CR>? 
;BRANCH IF _NO 
euch IS HIF YES THE FIRST CHAR? 


=8 
a 
VBE 


: ADD ASP HOLE nie Stee orn ACK 
000001 ’ CHP SIN i /RE-Dwele TV iy Keo. INTERRUPTS? 
164060 a $100, ISTKS i RE-ENABLE nr KBD INTERRUPTS 


PC, STYPEC 
(SP), #60 


R 
g 





TTY INPUT ROUTINE 


tates 002420 18$ Hh y YES 
0151 000067 CMP 


cane KE 


000202 ) 3318 THIS THe FIRST CHAR 
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178: 


188: 
BR 
.OSABL LSB 


OOKKOKDO0000 
= 0 bo me 
WUWIUNTUT UNION Uae 
0 0 b= 0 pe b> ps bo pe Be Fe 
ESERSERSS 


PHB HUH OH HOHE HEHE EEUU HEEB U HEH UHH G EUR EEEE REE 
iTHTS: ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


+ RDCHR 33 INPUT A SINGLE CHARACTER FROM THE TTY 
3% ;CHARACTER IS ON THE STACK- 


0 2 + bo bo b= be be 
ODO NMUN.CUITH 


te PtWITH PARITY SIT STRIPPED OFF 


¥ OPER R EH 


SRDCHR: 
1S: 


ininininuin 
NEREE 
pdetatatats 
eee es 


‘ite. if A gONTROL-S? 
FOR A CHARACTER 
UNTIL_ITS THERE 


es 


aie 
[ea =f oe | 

=aEE 
3s 


a$TKB, -(SP 
#¢C17?, (SP 
(SP)+ 174 3) 


1§ 

4(SP), #140 

4 IF _YES 

4(SP), #175 3318 ITA lee CHAR? 
4§ ie, IF YES 
#40,4(SP) 3 ;MAKE IT UPPER ae 


4S: 
$ , AARSRSEEESESEREEREENEENNNESEENEnEEESESERTEENNNEEEEEEESEDES 
AT THIS ROUTINE WILL INPUT A STRING FROM THE TTY 


RDLIN 5; INPUT A STRING FROM THE T 
RETURN HERE ADDRESS. OF FIRST CHARACTER WILL BE ON THE STACK 
t TERMINATOR WILL BE A BYTE OF ALL O°S 


8 
Spr Eee 
g 


He 
3 


_ 


2 
s. 


pp aiNiAi 

88: 

aa 
stars 
ee w 


es 


O01 
01 
Ol 
01 
01 
01 
O01 
Oi 
O01 
Ol 
O01 
01 
Oi 
O01 
01 
01 
O01 
01 
01 
01 
O1 


: MOV. R3.-(SP) ;SAVE R3 
CLR -($P) CLEAR THE RUBOUT KEY 
MOV aSTTYIN,R3 ::GET ADDRESS 





TTY INPUT ROUTINE 
015531 2s: pe ;;BUFFER FULL? 
se ‘ meine FROM THE TTY 
(SP)+, (R3) ;;GET CHARACTE 
000177 10S: . 8477, <R3) ss T peal 
eM f Hee THIS THE FIRST RUBOUT? 
000134 015520 i A BACK SLASH 
01 TYPE 
;;SET THE RUBOUT KEY 
: DEC . 3 ;BACKUP BY 
015522 ;;STACK EMPTY? 
at ;;BR_IF YES 
015520 ;;SETUP TO TYPEOUT THE DELETED CHAR. 
015520 9$ : $8 
;;GO READ ANOTHER CHAR. 
;;RUBOUT KEY SET? 
;;BR_IF NO 
;; TYPE A BACK SLASH 


;;CLEAR THE RUBOUT KEY 
3318 CHARACTER A CTRL U? 
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a3 


i 


a ek 
£o 


— 0 tm ee 


Readeeses 


age 


- 


;;GO0 START OVER 
#22, (R3) ss te Ys A “tR"? 


$9 
(R3) ;;CLEAR THE CHARACTER 
» SCRLF ;;TYPE A “CR” & “LF™ 
STTYIN 3; TYPE THE INPUT STRING 
;;GO PICKUP ANOTHER CHACTER 
QUES ss TYPE A ’?° 
;;CLEAR THE BUFFER AND LOOP 
(R3), 9S ;;ECHO THE CHARACTER 


iS, (R3)+ 
es 


desaponesce 


ce, 


33CL 
;;TYPE A LINE FEED 
*:CLEAN RUBOUT KEY FROM THE STACK 


::RESTORE R 
+ ABUST The STACK AND PUT ADDRESS OF THE 
33 FIRST ASCII CHARACTER ON IT 


penesaS 


—— 
bt al ae | 


RT ; ;RETURN 
9S: . 0 ;; STORAGE FOR ASCII CHAR. TO TYPE 
-BY 9 ;; TERMINATOR 
STTYIN: .BLKB ;;RESERVE 7 BYTES FOR TTY INPUT 
SCNTLU: . /tU/¢15><12> ;;CONTROL “U” 
i 7tG/¢15><12> ;;CONTROL “G” 
~ASCIZ § <15>¢12>/SWR = / 


-ASCIZ 7 NEW = / 


BepeRRS 


a 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
l 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


rate 
ith 
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DZDRGC.P11 TTY INPUT ROUTINE 
2509 
2510 .SBTTL TRAP DECODER 
gels 1 iTate ROUTING Witt PICKUP THe COMER BYTE OF THE TRAP INSTRUCT? 
sATHI ROUTINE WILL PIC EKUP THe LOWER BYT THE “TRAP™ INSTRUCTION 
gid et USE odd Tp INDEX T HROUGH T TRAP TABLE FOR THE STARTING ADDRESS 
15 tO T SIRED ROUTINE. THEN USING THE SS OBTAINED IT WILL 
2516 :#G0 TO THAT ROUTINE. 
e518 Ol 1 STRAP: MOV -(SP) ;;SAVE_RO 
at pt Bess sea ooo002 MOV Beep Ro ::GET TRAP ADDRESS 
eS20 piaedt 905740 TST -(RO) 3388 KUP BY 
2521 015576 111000 MOVB (RO), RO :GET RIGHT BYTE OF TRAP 
2Se2 015600 006300 ASL RO ; $POSITION FOR INDEXING 
2523 015602 O16000 o1S622 MOV $TRPAD(RO) ,RO is INDEX TO TABLE 
2524 O15608 900200 RTS RO ::GO TO ROUTINE 
Se5p 
be? :; THIS IS USE TO HANDLE THE “GETPRI™ MACRO 
e529 015810 O11646 STRAF2: MOV (SP), =( ;;MOVE THE PC DOWN 
2530 O156le O16666 o00004 oD0002 MOV 4(SP}, Sip) : HOVE THE PSW DOWN 
gee 015620 000002 RTI STORE THE PSW 
e533 .SBTTL TRAP TABLE 
2535 ;#THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
e536 -#BY THE “TRAP™ INSTRUCTION. 
2538 : ROUTINE 
Seag 015622 015610 $TRPAD: .WORD S$TRAP2 
2541 015624 014444 STYPE ;;CALL=TYPE TRAP+1(104401) TTY TYPEQUT ROUTINE 
2542 015626 014022 TYPOC ::CALL=TYPOC  TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
2543 015530 013776 STYPOS ;:CALL=TYPOS | TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
2544 015632 014036 STYPON 4} ECALLSTYBON TRAP+4( 104404) - TYPE OCTAL NUMBER (AS PER LAST CALL) 
seus 315634 011500 STYPDS ;;CALL=TYPDS ~ TRAP+S(10440S) TYPE DECIMAL NUMBER (WITH SIGN) 
ae 015636 014734 SGTSWR ;;CALL=GTSWR § TRAP+6(104406) GET SOFT-SWR SETTING 
2549 O1S640 O146E4 SCKSWR 3 3 CALL=CKSUR TRAP+7( 104407) TEST FOR CHANGE IN SOFT SHR 
2550 015642 015146 i SROCHR ;;CALL=RDCHR § TRAP+10(104410) TTY TYPEIN CHARACTER ROUTINE 
e561 15644 015266; SROLIN ;;CALL=RDLIN TRAP+11(104411) TTY TYPEIN STRING ROUTINE 
2553 O1S646 cO0000 BUFFER: 0 ;10 WORD BUFFER FOR THE COULTER INTERFACE TEST 
2554 900001 ~ ~ END 


ae 


nnanen 
| ond 
z2zze 
— 


=< 


RzbhHo SeURReERS 


ph pepe 
WCW O 


DOMDWMNWNWMOMMWHMOWMMOWMMOMWMWWoOMWW 
Iecanzan 


a 
wo 


% 
23 


SR 
= 


228338 


—e 
© 8% 


a 


vo 


=B 


88 
Se 


oe 


: 


Seas 


bet aotce vee 


8 


gEsspeReresen 
PATA tet 
BUN IEBRE 


R 
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G-C MACY11 27(732) 


ABLE -- USER SYMBOLS 


536 


1694 


1091 


1127 


1152 


1591 


1631 
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1S23 1562 
1813 2003 
1497 1503 1840 
1659 
1156 1163 1172 1173% 1S23% 1527 
1566 1571 1572 1573 1S83*  l632e% 
1632 
1690 1694 1981 1983 1984 
1695% 


1691 


1 
1 


S 
6 


32 
33% 
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DZDRGC.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 


ee ie! son 
Brio | Otasie 430 «Wae sce 
DOT4 013210 466 472 478 484 
EMTVEC= 000030 3508 S62% S63% 
Ol2e322 44g 1899 
10 12602 488 19338 
l 1 494 194e8 
a itt 
EM4Y 012434 464 19148 
EMS O1l2e466 470 19198 
picect Wee «gees 
c= Bos00s 45 S77e sags 
XTCNT Ol2026 1813% 1823% 1828s 
EXTTMP 012024 1817% 181 1821*% 1822 
EXTTST 011726 18 # 
= £EEEEE U 374 602 
2541 2542 2543 
eeet0 1332 at 8 740% 741% 320% 
1326 108 736% 737% 764% 
10ea# 1067 107S* 1077 
ll 1190% 1194 119S% 
l22e0% 1224 lees* 1229 
1271% 1275 le76% 1280 
1 1306* 131 1311% 
1569 1601 181 1818% 
GROIO. 001330 Sills 738% 739% 765% 
a 832% 3 Ki) 4 
870% 871% ck 873 
831 * % 
1042 1046% 1064% 1066% 
1184% 1187% 1188% 1192 
1217% 1218% Jleeek  l223% 
1268% 1269% 1273% 1274s 
1299 1303% 1304% 1308 
laste 1532% 1533%  1534% 
GRIVA 001340 5158 742% 755% 1381% 
1639% 1648% 1658% 1665 
GRIVB O01344 5178 74S% 746% 
1650% 1678 
GRIVSA 001342 S168 743% 
1597 1598% 1610 1611% 
GRIVSB OO0i346 5188 747% 748% 
15l2 1513 1596% 1612 
GRSTAT 001324 5098 735% 763% 934% 
980% 982% 584 * 
1439% 1447 1461% 466% 
1570# 1574# 576 1594* 
G = 104406 44 663 682 
s ll 2s 2300 2341 
BI 1336 Si4s 648% 527 1566 
IOTEST 003316 59 719% 2257 


4 
IOTST1 003372 732% 
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19838 


2014* 


6SS 
2essl 


1028% 
1 
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OZORGC YMBOLS 


1) 
OO 
ial 
on 
a) 
“oOo 
i 
— 
oe 


LF 
MINSIN 001362 
MSGRUS Ql22l2 
MSPNT1 peat 
NBEXT 1314 
NMBEXT O013i2 
NOTLCH 001334 
ODDJMP 001360 
PC =%000007 
PIRQ = 177772 
PIRQVE= 000240 
PRO = O000000 
PR1 = Q00040 
PRe = 000100 
PR3 = 000140 
PRY = 000200 
PRS = 000240 
PR& = 000306 
PR7 = 000340 
PS = 177776 
PSH so = «(177776 
PWRMSG 014376 
PWRVEC= 000024 
RBEG 001376 
RBEG! 001462 
RBEG2 003342 
RDCHR = 104410 
ROLIN = 104411 
RESVEC= 000010 
012272 
=%000000 
Rl =~000001 
Re =%000002 
R3 =%000003 


az 


CROSS REFERENCE TABLE -- USER S 


1426% 


2224s 
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144S# 


Lis See 
To BBN 
"i bad bad 


b= bp TOM b= b> pb bh 
oOn— 
Pro. 
ead 1 


+ mt the shed “NIU 


145S% 


2234# 


1475% 


2240% 


1162 
1030 


1812% 


1481% 


2252 


2 
1793% 


1181 
1033 


1833% 


1S508% 


2253% 


1258 
1045 


1965* 


1614# 


1048 
1888 


140% 


1057 
2074 


1652# 


1060 
2131# 


1659* 
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OZDRGC.P11 YMBOLS 


CROSS REFERE 
eg 
R =) 55h 
SETADD 003402 733 
SP =%000C06 2738 
1474 
l % 
1799# 
2103% 

22093 

2245 
22e98% 
2356% 

2396 

2428 
2474% 
Shs ume 
aun bat i40 409% 
713 

2077 
SWREG 000176 3768 
SWO = 000001 3128 
SWOO = 900001 3028 
SWOl = 3018 
SW02 = 00004 3008 
SWO3 = 000010 23948 
SWOY = 000020 2988 
SWOS = 000040 297% 
SWO& = 000100 2368 
SWO7 = 000200 e358 
SWOB = 000400 ese 
SWOS = 001000 2938 
SWl = O0000e 3ils% 
SW10 = 002000 2328 
SWil = 004000 231s 
SWie = 010000 2908 
SW13 = 020000 e898 
SW14 = 040000 2888 
eu: 1a if 

= 

ais = = poset 3098 
SWH = =6= 000020 308% 
SWS = QO00040 3078 
SWE = 000100 3068 
SW7 = 000200 3054 
SW8 = 000400 3048 
= 001000 303% 
BITVE= 000014 3458 
TKVEC = 000060 3528 
TPVEC = OO0064 353% 
TRANST 001364 SeS 
TRTvene 14 sae 
Terie Oba est 
TST10 6004150 844% 


ea eee 


1688 


686% 
S64 


NCE TABLE -- USER S 


692 
565% 


ee4se 
642 


753 
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2 
661 


DR11-K LOGIC TEST 


DZDRGC.P11 
TST1i O04%234 
TSTl2 004332 
TST13 OO4430 
T14 6 
Trg 
T 
TSTl 16 
TST2 003624 
Ted .. 754 
T r 1 
TSTe3 005150 
Te4 005234 
TSTes 
TST, 404 
Te18 oases 
TST30 9005744 
TST31 O06062 
TST32  O06222 
TST33 Q06616 
TST34 O007ele 
TST3S 007270 
TST36 007340 
TST37 OO07406 
TST4 003720 
Ter4 7 
Terae  DOPSES 
TST43 O10066 
TST44 O10240 
TST4S 010430 
TST46  OQi0562 
TST47 010734 
TSTS 003756 
TSTSO 011030 
TSTS1 OQ11124 
TSTS2 011250 
TSTS3 011724 
TSTSH 012030 
TST6 004014 
TST7 004072 
T = 104405 
TYPE = 104401 
TYPOC = 104402 
TYPON = 10 
TYPOS = 104403 
SAUTOB 1 


001122 
$2DDAT O011e6 


862% 
8 


DE 


ee 
OO 
coe 


é3 


Bi Poi bp bs ph pe 


w 
@ 


1351 


SRRNoSs 


ose APE Re Ake OERRG EC MAG YAI Er t73 ) Saad PAGE 65 


14598 
15188 

16208 

607 611 615 630 34 649 ~—s«653 
1798 «1837 Ss «1886 ~=s 2075) sa2l02Sss 2119S la 
2305 2362 2363 2266 2379 2 2409 
2485 «= 2488 «2S 492s SH 18 

2365 e2S4ee 


646% 665% 684% 717% 2359 #2508 


807 

906 921% 
959 970% 971 984* 100e* 1003% 1004 
1047% 1048* 1049 1067% 1068 1077* 1078 


1103 


705 
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1112% ee ie 113 11678 1168. ioe ny rt 1323 1336% 1337# 1349* 
014660 1390 133 334 4 4 ioe 
SWR O14664 essie 2549 
CMTAG 3898 ass ast Sbe S48 569 570 730 
CMl = 4els 4Yeek 4e38 
= 4218 4228 4238 
$CM3 = 000002 4198 421 
SCNTLG Teal e77 ‘ 
gehTpU ate ‘46s 75 5305 2102 2121 2126 2130 2306 2341 2390 2482 2eSCe 
SDOBLK 011714 1764 - 1798 18068 
SDOAGN 011454 1718 1727 17338 
TBL 11704 176 — 18028 
ee 11444 17298 2088 
SENDC 11412 568 17208 \ 
SENDMG 011463 1722 17378 
NULL 011460 17 17 
OP ae ts 17108 
OPCT O11 68% 17178 1721 
SERFLG 001103 39e8 1992 2021 2023 2029 2050 2065* 2093 
SERMAX 001115 398% 571% 2023 204S* 2050 
RROR 013504 S62 20638 
RRPC 1116 339% @©61981 1983 1984 2069 2070% 2071 2093 2108 
SERRTB 001176 443¢ 2116 
SERRTY O1364e el0ls 
SERTTL OOl1le t 
SESCAP 001170 4o4s 570% 2044% 2084 2086 2093 
ILLC 001156 417% 2310 2341 
S$FILLS 001155 416% 2341 
001120 4008 
T OO1124 4028 629% 692 698% 771% 782% 793% 07 817% 
818 823% 830% 833 5 839% S46* 49 852 Sohe 863% 2s4 
874 881% 892 $02% 3 904 906 909% 918% 920 
aeet 933% 92 GUoy gus 6% 959 I68* 7 981 1000 1004 1014% 
101S* 1016 101 1029 1030% 1031 1034 1044% 104S* 1046 1049 1059% 060 
1110 ll a ee ee 103 es 198 eT {rade 1023 1161% 112 oy 1163% 
1164 #3 1180% it {133s 1138 133 1hd3, 1257% {dees 1484 18s 1334% 
134S* 1350 1360% 1446% 1525* 1546% 1S64# 981 1984 
$GET42 011434 68 
SGT 014734 23638 #2547 
$HD = 900000 
SICNT 001104 3% 2036% 2037 2039% 2049 
SILLUP 014370 eee4 2240 22598 
SINTAG 001135 4078 2391 2s 
SITEMB 001114 7# 2071% 2093 2105 
SLF 001174 427% 2093 2341 2492 2eS0e 
SLPADR O01106 394% S7ee 20e7* e2042% 2047 2049 ; 
SLPERR 001110 ofits Ay ones 8294 84S* 901* 917% 1089% 1126% 1151% 1522% 1561% 2027 
eet, = £#eEEX U 5390 623 642 661 680 713 2042 £077 2294 
W O1sss4 2366 25068 . 
SMSWR 915543 2363 25048 
$MXCNT 013502 2040 20498 
SNULL 001154 41S# 231 2341 


f 
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82Se . B4le soe 
10238 10388 10528 
i427e «14568 «14838 
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Tmutue-e-e- 
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eve 
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STPE 0011 
STPFLG Bei ie 
T 001150 


TPS 
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1 
li 
$I N peuee 
T HREERE 
T 011500 
TY Rtas aa 
TYPEC 014614 
STY 014662 . 
$T 14022 
Siypoe BLS 
$xTS eh 
$OF I 014221 
S4OCAT= #2eeee U 
= 015650 


ee nee 


C-11-DZ0RG-C 
ABLE -- USE 


RE? 
S64 


252938 - 


] 
3318 


t 


25438 
9 
see 
41 
3 
23398 
2544 
2182 


3888 
2049 
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SYMBOL 


es44a 254Se 25468 2547 esiés 
Bes Ba?" Bote “PNY 


23288 2329 83962395 


22178 


428 557 S72 $73 5998 
2050 482095) 621408 2236 862260 


es49 
2093 


6038 


- 22698 





essos esSis 2sSes 


7048 7088 1 ‘| 
23541 2344 25018 2502 
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CLERIN 9908 1013 1043 1154 1185 1261 1332 1$30 1569 

CLEROT $89e 997 idle 1027 1042 1137 1153 1165 1184 1188 1193 1198 1203 $208 1213 
1218 l223 lees 1233 1238 1260 1264 1269 1274 1279 1284 1289 124 1299s: 1304 
1 1314 1334 1 iz 1843 1819 

Cave ce S 151 1610 164 1b. 





ERROR Se 776 787 2 834 
gi §33 986 186 1021 1896 1051 107° 1080 1105 1116 1141 10 249 13s 
1339 1352 1992 1394 1397 is 14eS 1441 1459 1454: 1468 1480 1505 1540 ssc 
l 1607 l 1628 1646 167 
CAPE 3558 
GETPRI 3558 
ee cece 3558 620 639 658 677 710 
NEWTST 3558 733 767 777 789 811 825 1 859 877 2 312 3 946 
9S2 963 975 990 1008 1023 1038 1052 1085 lle2 1147 1175 1251 1226 1341 
1 1372 1 1427 1 1483 1515 1554 1 1617 1634 1653 1681 80s 1829 
3ss# 1792 2245 224s 
PUSH 3sS# 1752 2226 e232 
REPORT 3558 
SCOPE 250s. 762 770 732 814 923 S44 862 0 33 930 943 
28 966 978 333 1011 1026 1041 1055 1088 1125 1150 1178 1254 13293 1344 
1393 1376 3=6.1402— ss 1430-1459 ~ 1518 1557 1888 1620 7 =: 1656 Wil = 1811 
I 3sSs 8 
SETTRA e538 os 2543 2544 2545 2547 2549 2550 2s51 
I 8 336 r4-1-) 797 808 821 893 $37 949 960 972 ges 1005 1020 
1035 1050 1058 1104 1115 1140 1169 1248 132 1338 13$1 1366 1392 1422 1445S 
. 12, 1478 1491 1506 1520 528 5393 1549 1ss9 1567 1877 1593 1608 1674 
SPACE 2sSs 
STARS 3558 384 428 759 761 7&7 769 777 779 789 791 g00 802 811 813 
acs 827 841 gry gsg 861 877 te 896 398 ais $14 927 9293 940 
34 952 Soy zs 365 ‘97S 977 992 1008 101 1023 1025 1038 1040 
1052 1054 108s 1087 lle2 1124 1147s 1149 1175 117? 1251 1253 1326 1328 1341 
1343 1356 1358 1373 1375 1399 1401 = 1427 1429 14S6 1458 1483 1485 1515 1517 
1554 15S6 1585 1587 1617 1619 1634 1636 1653 1655 1631 1683 1703 1742 1808 
1810 1829 1831 1989 2052 2096 2144 2222 2238 2273 2343 2346 2414 2443 lez 
SWRSU 3558 S748 
TRMTRP 25338 
3558 
25538 
2132 2364 
600 607 
422 
767 777 
are 
1399 . 1427 
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797 
1324 
1674 
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157 
























DR1I-K LOGIC TEST MAINDEC-11-DZ0RG-C MACYI1 27(732) 
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fur 
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apeatet anh, 


fur 
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reds 
ett 


uy 
vs) 
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Semi Lock ond 
wa 2 
we —rmr— 
RUBEE REE 
oa pes 
Ptr T 


rprur 
Seek 
Bees thoes 
paseaaases 
ey Me 
By see 


Few 


Den Bie Rw 


oe es 
_ 


NOU £m 
T Her 
8 oo 

babe 
WS um 


ist gist 
PRO os eRe 
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Bs ER 


643 


Mr forme 
So Ben EE 


roe 


aE 





for 
o— es 
bee 
wo 


Bebe 
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B ao 
NN Re 
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Fyre Ur 
BORG DBS Be 
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i8R 
MOV 





ST MAINDEC-11-D 
CROSS REFERENCE 


2203 


Sus 
823 


925 


PB RS UE Ro 


SS UTR RCT rerets 
asd Tet taste Lata 


ae 


sists 


ABR 


H+ 4 to  D 
Ss BBR 
iru o 


n 
ay 
o 


426 


ee eee 


NS 
Un. ou 


BIA 


gen 


Sie pResemes BIg 


Ww 
— 


Seee a ees 


2 = b+ b= b= b= pb po Beh 
Pb b— $— b— b= b-— bb 6 6 b+ op - = 


bb 0 bb 0 0 0 0 5 
aROees 
Ress 


2 


patel ag 
OUmrwe 


Reaae 


676 
2068 


c 
es 
ff 


SiSe 


A 


wi 
ara 
TUTU TU & = 2» 


or 
£3 


709 
2198 
2308 

7 


1 


SF to 


PERE B ae 


bs pe he 
TUOTU TU 0 9 2 


Sitch 


2011 


b= b= >= b= b= b= b— b= 6 = bp pb 


PRT RRO BRAS Boe sec 


— 
ate 
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2235 
e406 


2335 


DECRB aoe! SSA 


1799 


2259 


» 


TUTUTU TU 0 ob 
Oouwl1o sr 





2290 


OO 0 0 0 0 ho bb bs he pe 
Staten ictal 


z 














in 


SBSee cane ce 
BeOS 


b= b= bb be 


SRS Pace eaae 


S8RtRecBBoS 


Reale 


1 


5239 
2253 
2495 
1791 
2330 
1420 
1589 
1669 


o 


a "Ho WIIG" BNEW Red 77 prec 


-ASCIZ 4a? 4 Z 7 7 
a ak aC a nn cc 5 a nt eC 
2139 eee S502 )=—s S030 S04 = eS 06 
ot Fan 
YTE Ey 397 398 406 407 415 416 417 418 1736 169% §=6 2214S 21S) 22216 
eel? 2499 2500 
-DSABL = e411 
- ENABL gi6 2344 
“ENBc °337 24g 341 385 363 365 366 367 3 389 391 419 423 424 
Pi 429 481 558 S59 S62 S&4 Fed 8 S6 570 $72 S74 590 $39 
a a a << a cc 
a a ak 780 781 a3 78 7390 791 793 798 801 802 803 
804 803 ae 813 Bs 815 aie ae 826 eee 828 ag pas 843 844 
si 68s} SS RC SI LC 
350 953 954 955 956 961 964 965 966 967 973 $76 977 978 979 
380 986 991 992 993 994 1006 1009 1010 1011 10le 1021 1024 1025 1026 
1027 1036 1039 1040 1041 1042 1051 1053 1054 1055 1056 1057 1059 1086 1087 
1088 1089 1105 1116 1123 1124 1125 1126 1141 1148 1149 1150 1151 1170 1176 
eG 1178 1179 1249 1eSe 1253 1254 1255 1325 1327 1328 1329 1330 1331 1339 
1342 1343 1344 1345 1352 1357 1358 1389 1360 1367 1374 1375 1376 1377 1378 
1393 1400 1401 1402 1403 1423 1428 1429 1430 1431 1450 1452 1457 1458 1459 
1460 1479 1484 1485 1486 1487 1492 1507 1516 1517 1518 = 1519 1S2l 1529 1540 
1550 iSsS 1556 1557 1558 1560 1568 1578 1586 1587 1588 1589 1S94 1609 1618 
1619 1620 1621 1622 1635 1636 1637 1638 1654 1655 1656 1657 1675 1682 1683 
1684 1685 1686 1704 1706 1707 1709 i7le = 1718 1721 1722 1726 1728 1734 1736 
1737 1740 sig 1809 1810 1811 i8l2. 1830 1831 1832 1833 990 1993 1998 = 2003 
e00S e016 el 2020 §8elel 20203 «6802S Si eke 2S 0396S 2H 2042 8 e049 2050 2083 
20S 2065 2069 e074 ###2075 #2076 ### 2077 2088 5o94 2093 «2097 ~—s ll 2141 sie e223 
eceje 4 ge33 G6359 6c 6 6cetR OES OCGESNCté«éd Cb a Cem eh ere) ENT 375 41 
e415 =e443aY4Y Scns eey ef e485 ese e508 2313 19 See il ese e543 
aon cs 8% 4a aes e989 s0 &i es 
-EQUIV 249 250 es8 27 274 303 304 305 307 308 309 310 311 3l2 
331 332 333 335 336 337 338 339 Do a 
-EVEN $99 603 610 614 618 633 637 652 671 67S 704 708 1897 1980 
2140 2269 2508 
IF 233 247 313 341 362 364 365 366 7? 377 384 388 419 423 
424 425 428 429 481 5S3 558 560 S62 S64 S66 568 569 570 S72 
590 598 602 609 613 617 620 623 632 636 639 642 651 655 658 
661 670 674 677 680 703 707 710 713 759 761 763 76? 769 771 
775 777 779 781 782 786 791 793 797 800 802 804 811 
813 815 816 821 82S 827 829 841 843 84S 859 861 863 875 877 
879 881 893 896 898 900 901 9le 914 916 917 927 929 931 937 
940 S42 S44 949 952 954 956 960 963 965 967 972 975 977 979 
980 985 990 9932 394 1005 1008 1010 10le 1020 1023 1025 1027 1038 1038 
1040 1042 0S0 1052 1054 1056 1057 1058 1085 1087 1089 1104 1115 llee 1124 
1156 114 1147 1149 1151 1169 11/3 1177 1179 1248 A 1253 1255 1324 1326 
i 1 1331 1338 1341 1343 l 1351 1356 1358 136 1366 1373 1375 1377 
iaas 1392 1399 1401 1403 142 1427 1429 id3h 1449 1451 ee 1458 1460 14 
148 1485 1487 1491 1506 151 1517 1519 1Se 1528 1539 154 1S54 1556 1S 
1SS9 1567 1577 1585 1587 1589 1593 1608 1617 1619 1621 1622 1634 1636 1638 
1653 1655 1657 1674 1681 1683 1685 1686 1703 1704 1705 1706 1707 1708 z 
1711 1717 1720 1722 1726 1728 1734 1736 1737 1742 1808 1810 18le 1829 1831 
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a3 eee dos Boey | Stes SRE RZ BLE DHS 
es ee eC 


ete e308 eile e168 cee 33 ede cSi3 eS 
 IFF “309 362 364 366 367 385 390 419 
768 769 770 771 776 778 779 780 78 
801 802 803 804 809 8le- 13 Bie 81 
843 4 84S 860 861 862 3 87 
899 913 914 915 916 928 $29. 930 
959 953 954 9S5 956 961 964 it - 966 
996 991 992 993 994 1006 1009 101 1011 
1036 1039 1040 1041 1042 1051 1053 1054 1055 
1089 1104 i1ie 11e3 i184 1125 1126 1140 1139 
1178 1179 124 le le 1254 1255 1325 132 
1344 1s3 1352 1357 1358 1359 ia) 4 1374 
Ives Mee? «use «so? sib sisi7 sig Isis 
1557 1558 1560 Ise 1277 ieee 1587 1ea8 1884 
1622 1635 1636 163 1638 1654 1655 1656 1657 
1704 1708 i712 1717 720 1736 174 1809 1810 
1990 2016 2019 20e0 Oe3 2049 20S3 2055 
se St x, i. ie -i_ Bee <<, ee) | eS Pg 
IFT $95 603 610 614 618 633 637 652 656 
2417 8 24ee 
. IF TF $39 603 610 614 618 633 637 652 656 
e362 «8641S 2418 
TIF 232 237 eve 3$ 363 366 367 
570 $7e $73 1706 1712 1713 1724 1736 1740 
- 2002 2030 at e049 2050 #2056 #2057 * 2058 
cist e341 S44 862365) = e493 esos = eSH1 es4e 
. IRP 481 759 767 777 789 800 811 82S ss 41 
352 963 975 990 1 1023 1038 10S2 1085 
1356- 1373 1399 1427 S6 1483 1515 1554 1585 
1898 1829 eee e3e SS eSs EG 
-LIST e3e 3$5 366 374 419 421 422 423 481 
633 637 652 656 671 704 708 789 
793 800 804 811 815 829 841 845 
1018 1023102? «1038? tGs2 «1010881089 
1eS1 1255 1326 1330 1341 1308 135 1360 1373 
1460 1483 1487 1515 1519 1SS4 1S58 1383 1 iet 
1681 1685 1712 1728 1808 18le 1829 1 i 
an 8265 85 o7 os s5 & ess! 2552 
-MACRO 367 382 Se? 990 §8§=©. e533 
-MCALL 232 355 574 
-NLIST e232 355 366 374 419 421 422 423 481 
633 637 652 656 671 675 704 708 789 
793 800 804 811 815 825 829 841 845 
3le 916 927 931 940 S44 952 956 963 
10le 023 027 1038 1042 10S2 1056 1085 1089 
1251 1255 1326 1330 1341 1345 1356 1360 1373 
1460 1483 1487 1515 1519 1554 1558 1585 1589 


Henge 


Sasegese PANSs 
BUSLRR BR 
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SERRE SS 
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Bae 
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= fru 
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io” 
~ 
o 
-- 
@ 


Beret: 
BiGin Be 
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ype 1885 47ie_7eg 190g siz 1829 1893 1997 2088243 2533S age SHS 
355 “382 


. PAGE 429 
Repr iin» 5 1 1 ) ; 
ert xg a6 sP3 $3 482 83 5S2 620 639 658 677 £98 710 759 767 
7289 800 811 825 841 859 877 912 927 940 952 63 975 
230 1008 + «6s«1023—t:s«a10 1052 (si«108S)Ssisaid2@2?)Sssisd47)—sa1178—Ss«iSSsiBOGSCCiLYHL«Ssi8SSC=«LCG? 1399 
142 1456 1483 15] 1554 1585 1617 1634 #1653 1681 #1701 1740 1808 #1829 @©1987 
erie 2050 209% e242 2220 2271 2341 2510 2533 
“ibeb $35 375 376 390 393 394 395 3% 399 400 401 402 403 404 40S 
og 208 410 419 421 422 606 «61717 «1720 «17385 le 212S 2218 )3= 22552287 


ERRORS DETECTED: 0 
DEFAULT GLOBALS GENERATED: 0 


*, DZDRGC. SEQ/SOL/CRF=DZDRGC.P11 
RUN-TIME: SO 31 & SECONDS 
RUN-TIME RATIO: 317/88=3.5 
CORE USED: 24K (47 PAGES) 
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